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Il nuovo Lemon 11 è ancora più potente: nuove soluzioni tecniche e il drive da 160K incorporato consentono a questa macchina 

prestazioni eccezionali. È possibile infatti utilizzare tutti i migliori 
programmi professionali: package di gestione, data base, foglio elettronico* word processing, grafica, archiviazione», 
Lemon II è compatibile, ha un prezzo accessibile, garanzia e rete dì assistenza tecnica. 

È l'occasione per avere subito un vero computer professionale. 
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fi Irbro [nrfa di giochi con a compii 
ree, una vòlta tento visti dafia pane 
dei computer, e non deli utente 
te partì ulSare sprega. in modo som 
pfice ma pretto. come te il compu 
ter a focaie, come fa a produce iro* 
magici e suoni durante ri pinco e co* 
me ta Ite genere 1 ) a vincere 
Coti 9069 Pag 48 Lto 9 000 


ritagliare io fQintop^r«] e spedite in busta chiusa a 
GRUPPO EDITOfllALfc JACKSON O-vi^ione Libri ■ Vii Resellini. \2 - 20124 Milano 

CEDOLA DI COMMISSIONE LIBRARIA 


VOGLIATE SPEDIRMI 


JtKty Talché fi m Bermett 


imni 


i p 


HI 

Wl 1 


il libro fornisce le conoscenze essen- 
ziali per incominciare a programmare 
in BASIC su di un pedonai coiti - 
poter 
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PRIMI PASSI 
IN BASIC 

II libro propone lapp rendimento del 
linguaggio BASIC ir amile te studio e 
l'esame dettagliato di programmi già 
sente. 

Cutt.OBJD Pag. 48 ito 9 000 
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CONOSCERE 
IL PERSONAL 

il libro spiega che cosa si pud fare 
con un personal computer, come si 
usa e come funziona. 
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RIVOLUZIONE 

INFORMATICA 

Il volume è rivolto in particolare ai 
bambini, ma ari die a lutti colono 
die. presto 0 tardi, verranno coinvol- 
ti dalle nuove tecniche in termali ette 
piu come utenti che come operatori. 
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Dopo una rag da panoramica su ette 
cosa può fare un robot, il libro pre- 
senta uria sene di robot con Junzicn 
particolari- j robot a braccio. I robot 
operai, i re boi nello spazio, eie 
Àff r onta poi il problema di tome un 
roboi può essere programmato e 
controllate da un computer, e dt co- 
me praticamente si realizza un roboi 
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1 1 computer ha affascinato, fin da principio, solo gli uomini. Sono infatti 
assai poche le esponenti del gentil sesso che si sono avvicinate airavveni* 
ristico Scrocchio elettronico". Anche tra i lettori e gii abbonati alle nostre 
riviste si contano pochissime fanciulle. Nonostante Hntraprendenza femmi- 
nile abbia raggiunto da tempo quella che una volta era propria degli 
uomini, resta decisamente esiguo il numero di coloro che si interessano di 
informatica. Appare strano che il calcolatore, con la sua poliedricità, non 
abbia coinvolto positivamente le donne, alle quali normalmente piacciono 
le cose che possono assumere funzioni o ruoli diversi. 

Forse è la diffusa credenza che il computer sia una fredda macchina, che 
necessita, per il corretto funzionamento, di studi complicati o di chissà 
quali alchimie: forse è considerato, a sproposito, un attrezzo riservato a 
pochi eletti. 

Qualunque sia il motivo, resta il dato di fatto che la maggior parte delle 
donne non ha fatto proprio il dilagante fenomeno che sta rivoluzionando 
il modo di imparare, di divertirsi e dì lavorare insito nella diffusione del 
personal computer. 

Sta dunque a noi convincere le reticenti donzelle a provare almeno una 
volta il calcolatore, nella speranza che nasca quella curiosità che dì solito 
si trasforma in passione più o meno accesa. 

Ragazze, fidanzate, mogli, madri, zie e nonne, nessuna deve sfuggire! 
Obblighiamole davanti al video, mostriamo loro quanto sia semplice gioca- 
re o scrìvere con il computer: se dotate di un mìnimo dì sensibilità non 
potranno fare a meno di apprezzare ì vantaggi offerti dall’uso della macchi- 
na infernale; i casi, come sempre, possono essere due: amore a prima 
vista oppure odio eterno. 

Vale comunque la pena di tentare e, se la cosa si risolve positivamente, 
avrete trovato la tanto attesa giustificazione alle ore di sonno, sempre 
rinfacciate, perse in compagnia del fedele personal. 

Pietro Dell'Orco 
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Per collaborare a SUPERCOMMODORE 


La rivista è interessata ad articoli e programmi riguardanti la linea Commodore, di interesse 
generale, chiarì ed esaurienti. Vi proponiamo una piccola “guida”, che ha particolarmente !o 
scopo dì rendere più accurata la stesura dei vostri manoscritti: seguendo i nostri consigli si 
accresceranno le probabilità che le vostre buone idee e i vostri programmi vengano pubblicati. 


I T angolo superiore sinistro della prima pagina 
dovrà contenere: nome, cognome, indirizzo, 
numero telefonico, codice fiscale, data di spedi- 
zione, luogo e data di nascita. 

2 Tangolo superiore destro della prima pagina 
dovrà contenere la marca e il tipo di compu- 
ter al quale il lavoro si riferisce, unitamente ad 
eventuali espansioni di memoria o periferiche ri- 
chieste, 

3 il tìtolo de irarii colo, sottolineato, dovrà ini- 
ziare a circa due terzi in altezza della prima 
pagina, 

le pagine seguenti potranno essere battute 
normalmente, con la condizione che Tangolo 
superiore destro contenga un* abbreviazione del 
titolo e del cognome, unitamente al numero di 
pagina. Per esempio, Sprite Ed.../Brambilìa/2. 

5 il testo delParticolo dovrà essere battuto a 
macchina con interlinea di uno spazio e mez- 
zo, massimo due spazi; un margine di almeno un 
centimetro dovrà essere lasciato su entrambi ì 
lati dello scritto. 

« dovranno essere usati fogli in formato UNI 
A4 (em. 21 x 29,7) e il testo, scritto in carat- 
teri maiuscoli e minuscoli, dovrà occupare una 
sola facciata del foglio. 

7 nel caso il testo comprenda più fogli, questi 
dovranno essere uniti con un fermaglio o con 
un punto metallico aperto. 

avendo intenzione di spedire più di un artico- 
lo, questi dovranno essere inviati separata- 
mente insieme alla rispettiva copia su supporto 
magnetico. 

9 programmi brevi (meno di 20 linee) potranno 
essere inseriti nel testo, mentre programmi 
più lunghi dovranno essere listati separatamente. 
E ESSENZIALE per noi disporre di una copia 
del programma registrata più volte su supporto 
magnetico, su entrambi i Iati dello stesso. E prefe- 
ribile usare nastri di buona qualità e di lunghezza 
non eccessiva; ìa cassetta o il disco dovranno 
essere etichettati con il nome delTautore, il titolo 
delTarticolo, il computer interessato e soprat- 
tutto le eventuali espansioni richieste. Come sug- 


gerimenti di programmazione si consiglia di usa- 
re le istruzioni M CHR${ x )*\ “TAB( x )*\ SPC{ x 
)”, piuttosto che stringhe di manipolazione del 
cursore. 

Ad esempio, per uno scroll di 5 linee l'istruzione 
“FORI = ITOSiPRINTiNEXT*. è molto più in- 
terpretabile di 5 Q inverse; e, invece di una dozzi- 
na dì simboli di cursore a destra, perché non 
usare semplicemente “PRINT SPC (12)”? Un ra- 
pido controllo dei programmi per operare queste 
sostituzioni sarà molto apprezzato da noi e dai 
lettori. 

per maggior chiarezza, all’interno delTar- 
tìcolo è conveniente usare caratteri maiu- 
scoli riferendosi a istruzioni BASIC (esempio RE- 
TURN, LIST, RND, PRINT ecc.). Se si desidera 
evidenziare una parola, è preferibile sottolinearla 
piuttosto che scriverla in carattere maiuscolo. 

n gli articoli ed i programmi potranno avere 
qualsiasi lunghezza: da una routine di una 
sola linea fino a programmi molto complessi. 

volendo includere diapositive, queste do- 
vranno avere formato 24x36, o 6x6. 
non prenderemo in considerazione artìco- 
li che siano stati sottoposti ad altre case 

editrici. 

il materiale non pubblicato non verrà re- 
stituito. 

il compenso per la collaborazione presta- 
ta sarà commisurato alla complessità e 
all’interesse de! testo e/o del programma (da un 
minimo di L. 50.000 a un massimo dì L, 
300.000). Il pagamento verrà effettuato in caso 
di pubblicazione del lavoro. 


Inviate idee e programmi a: 

SUPERCOMMODORE 
Viale Restelli, 5 
20124 Milano 

e saremo lietissimi di pubblicare i contri- 
buti migliori. 

La Redazione 










Caricamento automatico del lin- 
guaggio macchina 

Sono un vostro abbonalo affa sola rivista, 
che ha digitato tutti i programmi in Un 
guaggio macchina per C64 fino ad ora 
pubblicati Vorrei chiedervi se esiste 
qualche sistema per fare in modo che 
questi ultimi vengano mandati in esccu 
ztone con un semphce RUN invece della 
SYS. il cui numero si dimentica fadlmen- 
te 

Giovanni Marchesi 

R* Il sistema è mollo semplice. Per i 
programmi in linguaggio macchina che 
non risiedono nell'area normalmente 
occupata dai programmi BASIC è suffi- 
ciente registrare su nastro o su disco, 
prima del programma in linguaggio 
macchina, un cosiddetto ^caricatore" 
BASIC. Questo caricatore - che ovvia* 
mente si attiverà con un semplice RUN 
- sé occuperà di caricare il linguaggio 
macchina e di dare la SYS di attivazione 
in modo automatico, 

Per passare ad un esempio pratico, sup- 
poniamo di voler caricare da nastro o 
disco e mandare automaticamente in 
esecuzione, senza dover tenere a mente 
il numero deila SYS, il programma 
“'Cosmic Combat" pubblicato sul nume- 
ro di Febbraio, 

Dovremo scrivere questo programma in 
BASIC 

10 IFA=0THENA^ l ^OAD^CC", 1 , 1 
20 S YS49152 

Ovviamente occorre modificare il primo 
1 in 8. se si utilizza il drive. Questo 
programma andrà salvato con il nome 
“Cosmi c Combat", mentre il program- 
ma in linguaggio macchina vero e prò* 
prio dovrà essere salvato subito dopo 
{questa sequenzialità non è logicamente 
richiesta se si utilizza il drive) con ìl no 


me “CC". 

Vediamo ora il perché della insolita IF ... 
THEN come prima istruzione di un prò 
gramma. 

Quando si esegue l'istruzione LOAD da 
programma, e non m modo diretto, alla 
fine del caricamento viene forzato un 
RUN, ed il programma che si troverà 
in memoria al termine del caricamento 
verrà quindi mandato In esecuzione. Se 
il primo programma caricasse un altro 
programma BASIC, quest'ultimo si so- 
vrapporrebbe al primo e verrebbe auto- 
maticamente eseguito una volta carica- 
to* *■ poiché nel nostro caso il secondo 
' programma è.il linguaggio macchina, ed 
occupa un'àrea di memoria non utilizza- 
ta dal BASIC, alla fine del caricamento 
il RUN automatico avrà ancora effetto 
sul caricatore, poiché esso si troverà 
ancora nella memoria BASIC. 

Per evitare che venga eseguita allinfinì- 
to l'istruzione LOAD c'è appunto que- 
sta condizione di IF. ... THEN. 
Ricapitolando, quando si dà il RUN al 
caricatore la variabile A vale 0 e viene 
quindi eseguita l'istruzione LOAD- alta 
fine del caricamento c'è un RUN auto- 
matico, ma la variabile A vale questa 
volta 1: il LOAD non viene più eseguito 
ed jj programma passa alla linea 20 T 
mandando in esecuzione il programma 
In linguaggio macchina con l'opportuna 
SYS. 

Chi utilizza il drive invece dell 1 unità a 
cassette, e quindi non soffre della perdi* 
ta dello schermo durante i] caricamen- 
to, può abbellire il caricatore, scrìvendo 
ad esempio un programma del gene* 
rer 

10 IFA-1THEN60 

20 POKE 53280*0: PO KE5328 1 ,0: 

POKE646.5 

30 PRINT“[CLR][3 GIÙ] STO CARI- 
CANDO IL LINGUAGGIO MAC 


CHINA" 

40 PRINr[2GIÙJ ATTENDERE PRE 
GO...” 

50 1FA=0TH£NA- 1 :LOAD ,l CC".8, ] 
60 SYS49152 

Questa tecnica, lo ricordiamo* non è ap- 
plicabile a programmi in linguaggio 
macchina che risiedono nello spazio 
normalmente occupato dai programmi 
BASIC (locazione iniziale 2048) Dal 
momento tuttavia che quasi lutti quest* 
programmi già si attivano con ìl RUN — 
essendo dotati di una linea BASIC che 
effettua la SYS - non avrebbe alcuno 
scopo utilizzare un caricatore di linguag- 
gio macchina 


Automi! da disco 

/ programmi registrati su nostro si posso- 
no caricare e mandare subito in esecuzfo 
ne. premendo contemporaneamente 
SHIFT e RUN /STOP Dai m omento che 
possieda solo un disk drive 1541. vorrei 
sapere se. ed eventualmente come, è 
possibile ottenere lo stesso risultato cari 
cando i programmi da disco , - 

Sandro Marchigiani 

R* l programmi su disco possono essere 
caricati e mandati subito in esecuzione 
digitando LOAD “nome del file", 8: e 
premendo SHIFT e RUN/STOP quan- 
do ci si trova con lì cursore dopo i due 
punti La pressione dì questi due tasti 
provoca la stampa dell’istruzione 
LOAD + CHR$(13) - il L3 è il codice 
ASCII del tasto RETURN — e forza nel 
buffer di tastiera un'istruzione 
RUN+CHR8U3) Alla fine del carica- 
mento del programma il buffer di tastie- 
ra a svuota, stampando RUN seguito 
dal codice del RETURN, ed il program- 
ma viene quindi attivato 
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Piccola guida per 
l’input 

dei programmi 


M olti dei programmi listati da SUPERC0MM0- 
DORE contengono particolari caratteri di control- 
lo (controllo cursore, tasti colore, videodn verse, ecc.). 
Per rendere chiaro ciò che dev'essere battuto quando 
è necessario inserire uno dei suddetti caratteri sono 
state stabilite le seguenti convenzioni. 

Generalmente ì listati per VlC 20 e €64 contengono delie 
«parole» racchiuse tra parentesi graffe j |; tali paroje 
rappresentano particolari caratteri dì controllo: JGIÙj 
significa premere il simbolo del cursore verso il basso. 1 5 
SPAZI } vuol dire battere 5 volte la barra-spazio. 

Per Indicare che un tasto dev’essere «shìftato», cioè 
premuto insieme al tasto SHIFT, nel listato il simbolo 
di questo tasto sarà sottolineato. 

Per esempio S Significa che dev'essere premuto il tasto 
S mentre è abbassato il tasto SHIFT. 

La manovra farà apparire sullo schermo un pìccolo 
«cuore». 

Trovando un simbolo sottolineato chiuso tra parentesi 
graffe (esempio { 10 N () do via essere interpretato co- 
me «premere il carattere indicato per il numero di volte 
che lo precede nelle parentesi»: nel nostro esempio 
premere IO volte il tasto N «shlftato». 

Se il tasto da premere e indicato tra le parentesi [ { )}, 
vuol dire che lo stesso dovrà essere premuto mentre 
è premuto il tasto «Commodore» (il tasto «Commodo- 
re» è quello posto nell’angolo in basso a sinistra). 

Se li tasto scritto tra [ {)] è preceduto da un numero, 
ciò significa che il tasto dev'essere premuto per il nu- 
mero di volte indicato. 


Raramente SÌ potrà trovare un carattere alfabetico soli- 
tario racchiuso tra parentesi graffe. Tale carattere sul 
C64 può essere battuto mentre è premuto il tasto 
CTRL. 

Ad esempio ) A j sta ad indicare la sequenza CTRL- A. 
A proposito del «modo virgolette» è nota la possibilità 
di muovere il cursore sullo schermo con i tasti CRSR. 
Ogni tanto i programmatori desiderano muovere il cur- 
sore durante Tesecuzione del programma. È per que- 
sto motivo che nei programmi si troveranno dei j SIN }. 
{ HOME | e jBLUf. 

L’unico modo perché il calcolatore distingua il coman- 
do diretto da quello inserito nel programma è 11 «modo 
virgolette». Premendo il tasto «virgolette» (tasti SHIFT 
2} ii calcolatore Si predispone appunto in «modo virgo- 
lette». 

Battendo un carattere qualsiasi, cercando poi di cor- 
reggerlo muovendo il cursore, si otterrà solo un trat- 
to verticale in un quadratino inverso. Questo è infat- 
ti il simbolo del cursore a sinistra nel «modo virgolette». 
L'unico comando dì editing non utilizzabile all'Interno 
di un programma è il DEL, Battendo nuovamente le 
«virgolette» il calcolatore lascia il «modo virgolette». Sì 
può accedere al «modo virgolette» quando inserite spa- 
zi nella linea. 

In ogni caso, il sistema più semplice per uscire dal 
«modo virgolette» è quello di premere il tasto RE- 
TURN. 

Utilizzare la tabella che segue quando è necessario 
inserire comandi relativi al cursore e ai tasti colore. 


Quando leggete: 

Premete: Vedrete: 

Quando leggete: 

Premete: 

Vedrete: 

Quando leggete: 

Premete: 

Vedrete: 

(CLP} 

fallii 

E 

{CYN } 

BEI Q 

m 

[<7>] 

0 o 

□ 

{HOME} 


m 

{ PUR 1 

Q3Q 

m 

[<8>] 

□ a 

■ m 

u m 

{SU} 


a 

formi 

CESO 

□ 

(Fi} 

m 

5 

{GIU 1 l 
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Anche in Italia è iniziata la com- 
parsa sai mercato dei primi com- 
puter MSX, Cerchiamo di analiz- 
zare cosa differenzia i computer 
M5X da tutti gli altri e che cosa 
comporta per il mercato l'entra- 
ta di questo nuovo prodotto. 


O gni prodotto che neh teda per il suo 
funzionaménto l'utilizzo di mezzi 
esterni risente* per ottenere successo 
sul mercato, della maggior o minor re- 
peribilità e compatibilità di questi ultimi. 
Un esempio di quanto questa afferma- 
zione sia vera lo si può trovare nel mer- 
cato dei prodotti audio per automobile 
di qualche anno fa. quando i pur tecni- 
camente superiori lettori di cassette 
"Stereo 8" vennero m breve tempo latti 
scomparire dalla piazza a causa dell af 
fermazione dello standard "compact 
cassette". Quest'ultimo venne infatti 
adottato da un numero sempre maggio 
re di case produttrici di apparecchi HI 
FI per l'auto o per la casa* mettendo 11 
possessore di un apparecchio “stereo 
8" in una situazione di sempre più diffi- 
cile reperibilità di nuove cassette. 
L'affermazione sul mercato di uno Star» 
dard piuttosto di un altro non è solo 
funzione del livello tecnologico raggi un 
to dalle varie proposte, ma dipende for- 
temente dagli interessi economici e dai 
capitali investiti da parte delle grandi 
aziende produttrici scese nella competi- 
zione. Anche oggi stiamo assistendo alla 
“guerra 1 ' per l'affermazione di uno stan 
dard - e quindi di una supremazia - 
nel settore del videoregistratori: già ora 
recenti acquirenti di alcuni di questi pro- 
dotti si ritrovano in mano apparecchia- 
ture obsolete, non perché superate tee 
nica mente, bensì perché la maggiore af 
fermazione commerciale di altre mar 
che, espandendo le proprie vendite di 
cassette ed apparecchiature* comprime 
fatalmente quelle della concorrenza, co- 


stringendo queste aziende ad uscire dal 
mercato od a riconvertirsi sul breve ter 
mine al nuovo standard. 

Il mercato degli "home computer", svi- 
luppatosi nel nostro Paese da poco tem- 
po, è sempre stato caratterizzato dai 
problemi li pici dell’ assenza di uno stan- 
dard Molte piccole “tragedie persona- 
li” si sono consumate sul capo di acqui- 
renti poco informati che, portato a casa 
dal negozio il nuovo computer di una 


marca poco diffusa, si sono trovati da 
vanti ad un video vuoto, per la quasi 
totale irreperibilità sul mercato di soft 
ware originale a compatibile 
Un esempio di tentativo di standardizza 
zione nel settore dei personal computer 
è rappresentato dal CP/M (Control 
Program for Microcomputers}* che. Uno 
a poco tempo fa, era il sistema operati- 
vo più diffuso per gli utilizzi gestionali 
su computer appartenenti alla fascia di 
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prezzo superiore. Esistono migliaia di 
programmi scritti sotto CP/M che pos- 
sono essere eseguiti su una gran quanti- 
tà di computer differenti, dal portatile 
al desktop con hard disk La stessa 
Commodore ha realizzato nell 984 una 
cartuccia per C64 - per altro di diffici- 
lissima reperibilità in Italia - che per- 
mette di eseguire su questo computer 
programmi scritti per "girare” sotto 
CP/M. 

A questo punto sembrerebbe ovvio che 
ogni computer dotato di CP/M possa 
caricare ed eseguire programmi scritti 
per "'girare” sotto CP/M... Invece è 
proprio qui che cade 11 discorso standar 
dizzazione: per fare un esempio, suppo- 
niamo che disponiate di un C64 con 
cartuccia CP/M; come detto, siete In 
grado di eseguire sul computer qualun- 
que programma scritto per “girare” in 
ambiente CP/M. Tutto vero, tuttavia 
non sarete in grado di caricare in memo- 
ria da disco il programma, a meno che 
questo sia stato registrato con un altro 
C64 Ciò perché la formattazione Com- 
modore dei dischi none compatibile con 
altre formattazioni CP/M cosi, non po- 
trete semplicemente inserire un disco 
CP/M nel drive 1541 e caricare un pro- 
gramma CP/M, anche se probabilmen- 
te il programma “girerebbe” perfetta 
mente una volta foste riusciti a caricarlo 
in memoria II sogno di poter disporre 
delle migliaia di programmi CP/M con 
la semplice inserzione di una cartuccia 
nel computer crolla così miseramente 
dovrete attendere che qualche software 
house renda il singolo programma 
disponibile per C64 con cartuccia 
CP/M 

Lo stesso discorso, passando dal CP/M 
al MS DOS e PC-DÒS, si può applicare 
aì computer cosiddetti " compatì bili' 1 
con il PC IBM i quali non sono mai, a 
causa de ir aggressività con cui la IBM 
difende dal punto di vista legale i propri 
brevetti, compatibili al 100%. È così 
vidi... 

Sembrerebbe facile, almeno teorica 
mente, trovare uno standard per gli 
“home*: è sufficiente considerare il 
computer con il miglior rapporto quali- 
tà/prezzo f stabilire quali siano le sue 
caratteristiche hard-soft fondamentali 
ed assumerlo come "modello” per tutti 
i costruttori In realtà occorre fare L con- 
ti con le esigenze di mercato: il compu 
ter con il miglior rapporto qualità/ 
prezzo - e per qualità si Intende anche 
una vasta gamma di software disponibi- 
le - è in generale quello che ottiene il 
maggior volume di vendite rispetto alla 
concorrenza. Per questo motivo ben dif- 
fìcilmente la casa produttrice sarebbe 


disposta a cederne i diritti di brevetto 
ad altre aziende, senza porre condizioni 
economicamente pesantissime e poco 
concorrenziali per queste ultime. 

Il problema va quindi risolto alla base: 
un gruppo di aziende si deve accordare 
e progettare "ex novo” un computer 
che si possa imporre sul mercato per il 
suo rapporto qualità/prezzo, e la cui 
politica dì commercializzazione ne con 
senta una grande diffusione, uni t amen 
te ad una notevole apertura verso altre 
aziende desiderose di entrare nello 
standard. 

Lo standard M5X materializza il primo 
tentativo fino ad ora effettuato per otte 
nere questi scopi Fondamentalmente 
giapponese (Sony, Toshiba, Canon, Pio 
neet. Yashica, ecc), e con una compo- 
nente statunitense (Philips e Spectravi 
deo), lo standard M5X è basato su spe 
cifiche che devono essere necessaria 
mente possedute da tutti i computer 
che ne usino il marchio. Queste spedii 
che si possono riassumere in 

- Microprocessore Zilog 2 80 A (un 
microprocessore a otto bit con una fre- 
quenza di clock di 4 MHz). 

- Memoria ROM di 32 Kbyte, conte- 
nente il BASIC M5X ed il Sistema Ope 
rativo BIOS 

- Memoria RAM di almeno 8 Kbyte. 
Una raccomandazione nello standard 
porta la RAM a 64 Kbyte per il mercato 
europeo e nordamericano. 

- Memoria RAM vìdeo di 16 Kbyte, 
aggiuntiva alla RAM di cui sopra. 

- Chip video Texas Instruments 
TMS9918A, in grado di fornire molte 
plict modi testo, da uno schermo 24 x 
29 ad uno 24 x 40, 256 caratteri ndeft 
nibili a 6 x 8 pixel, una risoluzione mas 
sima di 192 x 256 pixel. 16 colon e 32 
Sprite. con un massimo di 4 Sprite per 
linea orizzontale, 

- Chip sonoro General Instruments 
AY-3-8910, a ire voci ed otto ottave, 
con una risoluzione di frequenza di 12 
bit. 

- Almeno una porta per espansioni di 
memoria e software su cartridge. con 
un'espansione di memoria massima 
possibile fino al 1 Mbyte 

- Tastiera con un minimo di 70 tasti, 
controlli cursore separati e cinque tasti 
funzione, 

- Interfaccia per drive a floppy disk 
MSX-DOS, anche se essa non è compie 
tamente standardizzata II formato dei 
dischi è comunque I MS DOS, che ri- 
chiede almeno 64 Kbyte di RAM e per 
mette al drive di leggere dischi format 
tanti ad esempio su PC IBM o un PC 
compatibile. 

- Interfaccia per unità a cassette con 
velocita di trasmissione selezionabile tra 
1200 e 2400 Baud. 

- Dimensioni standard degli slot per 
cartridge, circuiti standard per V indiriz- 
zamento delle espansioni e standard 
per tutto ciò che riguarda livelli di se 
gnale sui vari piu. mappa di memoria, 
punti d ingresso per il sistema operati- 
vo. vettori RAM. ecc. 


Queste sono le specifiche mìnime per i 
computer prodotti con il marchio MSX. 
Poiché deve comunque esistere una 
concorrenza anche tra le aziende ade- 
renti allo standard, queste ultime sono 
lasciate libere di aggiungere ai propri 
prodotti caratteristiche opzionali che 
comunque non interferiscano con lo 
standard (ad esempio video ad 80 co- 
lonne, porta RS 232, porta parallela 
per stampante, ecc.). 

La scelta dei componenti effettuata non 
è casuale si è cercato di utilizzare una 
tecnologia che fosse allo stesso tempo 
relativamente semplice, collaudata ed 
economica: basti dire, a titolo di esem- 
pio. che il chip audio adottato dallo 
standard MSX è esattamente quello im- 
plementato da anni sul TI 99 /4A, Cole- 
co Adam e IBM PCjr, mentre il chip 
video è quello presente sul TI 99/4A e 
su! Coleco Adam 11 microprocessore Zi- 
log Z80 é da anni implementato sui 
computer Sinclair, dallo ZX-80 allo 
Spectrum 

Questo tipo di scelta, pur presentando 
la massima affidabilità tecnica, rischia 
di essere troppo conservatrice per una 
serie di computer nata ora e destinata 
a resistere pei anni sul mercato: si pre- 
vede Infatti che tra poco più di un anno 
sarà possibile trovare, a prezzi estrema 
mente interessanti, computer basati su 
microprocessori a 16 ed anche a 32 bit, 
dotati dì caratteristiche ora disponibili 
solo su macchine dal costo superiore ai 
tre milioni, Se ciò avverrà realmente - 
in un mercato ribollente come questo 
non si possono che fare previsioni dì 
massima * lo standard MSX diverrà 
presto obsoleto. 

Ritornando a! presente, i computer 
MSX devono già attualmente misurarsi 
con un'agguerrita concorrenza costitui- 
ta fondamentalmente da Commodore e 
Sinclair un C64 costa poco piu della 
metà di un MSX, dispone di una quanti 
tà di software pressoché illimitata e di 
una grafica con risoluzione superiore. 
Per contro. Il BASIC MSX è un BASIC 
Microsoft - ricordiamo che MSX sta 
per MlcroSoft eXtended - che può 
tranquillamente essere definito come il 
più completo interprete BASIC fino ad 
ora implementato su qualsiasi personal 
computer oltre ad essere velocissimo, 
dispone di una quantità di istruzioni tale 
da far letteralmente Impallidire al co- 
spetto anche il BASIC Commodore 3.5 
implementato di recente sul 06 e 
Plus/4. 

È molto difficile quindi poter prevedere 
la diffusione che i sistemi MSX avranno 
nel nostro Paese, anche perché non sia- 
mo ora in grado dì valutare la portata 
delle attese novità a 16 e forse anche 
a 32 bit della Atari e della Commodo 
re. 

L'esperimento MSX. qualunque risulta- 
to possa sortire, rappresenta un "iniziati* 
va importante che, ci auguriamo, potrà 
aprire la strada ad una futura e genera- 
le standardizzazione dei personal com- 
puter. 
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Giulio Carducci 

LE APPLICAZIONI 
DEL COMPUTER 
NELL'UFFICIO 
MODERNO 

Questo libro vuole essere unìntrodu- 
zlone al Ti nf or malica e. nel contem- 
po, una guida ali 'utilizzo consapevole 
dello strumento del giorno, il perso- 
nal compu Ler. nell’ ufficio moderno e 
nello si udio professionale È rivolto 
pertanto, ad un vasto pubblico: ad- 
detti al vari settori deli' azienda, qua- 
dri, dirigenti, ingegneri, architetti, 
professionisti In genere. 

Cod.407H Pag. 132 Lire 23.000 


Michael Browne 

UNITÀ A DISCHI PER 
MICROCOMPUTER 

Il libro, destinalo a lettori cori una 
buona conoscenza di base dell'uso di 
un calcolatore e del linguaggio BA- 
SIC, descrive il funziona mento dell'u- 
nità a dischi di un personal computer 
e il significato dei comandi relativi, 
con particolare attenzione per le di- 
verse tecniche di gestione dei file su 
disco. 

Il libro è arricchito di diversi pro- 
grammi esempio in BASIC Commo- 
dore 4.Q, relativi alle diverse tecniche 
di organizzazione e gestione dei file 

C$d 300P Pag. 156 lire 15.800 


Mauro Salvemini 

URBANISTICA 
E INFORMATICA 


Graziella longoni 

LA COMUNICAZIONE 
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CAMBIATA 


Pregia unitario 


Questo libro vuole offrire una acca 
sione a tutti i suoi lettori per analizza- 
re, scopare e potenziare le proprie 
capacità comunicative e divenire prò- 
tagonisti reali di una ampia trasfor- 
mazione in corso, dì cui uno degli 
aspetti più evidenti 6 co sii in ilo del l'e- 
spandersi progressivo delie tecno- 
logie. 


n PaghsiS conlrauegno di poslmo il pr»io indicalo più U 3.M0 per contributo liuto 
ipiu di ifwdilioni. 
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Arthur Naiman 

WORD STAR 

Perché un computer, anche di cate- 
goria miao, sia utile nell'attività di 
ufficio È essenziale ohe permette 
anche di effettuare Telaboraziont dei 
testi, con tutte fa funzioni che dò 
comporta. I prodotti software a dò 
destinati sono oggi moltissimi ma 
SOto alcuni emergono per completez- 
za e flessi bilitì: fra questi Wordstar è 
sicuramente uno dei piu riusciti. 
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Sempre più vaste sono le applicazìa- 
ni deir Informai Ica in ogni settore del- 
la vita e dei lavoro, e In particolare 
quelle della computer grafica. Nean- 
che mestieri e professioni con una 
origine antica come l'architetto o 
l'urbanistica si 'salvano' dal Tonda 
dell informatica 

Un entusiasta utilizzatore di quest'a- 
rea cu Murale racconta in questo libro 
per i coreghi e gli studenti di arch - 
t erti u r a e di urbanistica tutti i vantaggi 
e gii avanzamenti possibili nella pro- 
gettazione e te studia di nuovi edifici, 
complessi edilizi a urbani grazie alla 
computer grafica 
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La piccola guida 
del principiante 


Cile co* t un progrann*? 

]l solo computer non può compiere alcuna operazione. 

Un computer possiede potenzialità, ma, come una macchina 
senza benzina, senza un programma non può funzionare. 
La maggior parte dei programmi pubblicati su SUPER- 
COMMODORE per i computer Commodore sono Scritti in 
un linguaggio per calcolatori chiamato BASIC, !l BASIC è 
facile da imparare ed è disponibile, di serie, nel V1C 20 e 
nel Commodore 64 

Programmi BASIC 

Ogni mese SUPERCOMMODORE pubblica programmi sia 
per il VIC 20 che per LI C64. Tanto per cominciare, se 
possiedi un VIC 20 copia solo i programmi scritti per la tua 
macchina, indicati con * versione per VIC 20”. Piu tardi, 
quando avrai acquisito esperienza con il BASIC del tuo com- 
puter, potrai cercare di copiare e convertire programmi 
scritti per altri calcolatori. Diversamente dal linguaggio cor 
rente, che può essere variamente interpretato, il BASIC dì 
solito ha un solo modo corretto per indicare qualcosa. 

Ogni lettera, carattere o numero ha il suo significalo. 

Un errore banale è costituito dalla sostituzione del numero 
“0" con la lettera “O" oppure il carattere minuscolo *1" 
invece del numero “1" o ancora il carattere maiuscolo “B" 
con il numero “8T 

Devi anche inserire tutta la punteggiatura, i due punti (:) e 
le virgole, copiando esattamente ciò che. appare sulla rivista. 
Gli spazi possono essere importanti. Per essere sicuro copia 
il listato esattamente come si presenta, 

U parentesi e I caratteri speciali 

L'eccezione per questa regola dì copiatura si presenta quan 
do incontrerai indicazioni tra parentesi, quali: w {Glu} ,# . 
Ogni cosa compresa tra parentesi è un carattere speciale 
oppure un carattere che non può essere facilmente prodotto 
con la stampante. Incontrando un carattere di questo tipo 
fai riferimento alla “ Piccola guida per Tinput dei program- 
mi". 

Le istruzioni DATA 

Alcuni programmi contengono una sezione, o delle sezioni, 
dì istruzioni DATA Queste lìnee di istruzione forniscono le 
informazioni di cui il programma Ira bisogno 
In alcuni casi le istruzioni DATA costituiscono il programma 
vero " ^ r ni>no. in altri contengono codici grafici. Queste 


linee sono particolarmente soggette agli errori. Se un solo 
numero in una linea di istruzione DATA è sbagliato, il calco 
latore potrebbe “piantarsi" o distruggere il programma. La 
tastiera e il tasto STOP appaiono inattivi e lo schermo com- 
plètamente vuoto. Non lasciarti prendere dal panico. Non 
si è verificato alcun danno. 

Per riprendere il controllo devi spegnere il computer e suc- 
cessivamente riaccenderlo. Ciò cancellerà qualsiasi pro- 
gramma presente in memoria, per cui è sempre necessario 
fare il SAVE del tuo programma prima di comandare il 
RUN, 

Se il computer si ferma, puoi caricare (LOAD) il programma 
e cercare Terrore, 

A volte, quando il programma viene “lanciato”, un’istruzione 
DATA errata può causare un messaggio di errore. 

Il messaggio di errore potrebbe riferirsi alla linea dì program 
ma che legge (READ) il contenuto delle istruzioni DATA. 

Come conoscere 11 computer 

Dovresti prendere confidenza con II computer prima dì pro- 
cedere alla copiatura del programma. 

Impara le istruzioni che si usano per memorizzare e richia- 
mare ì programmi da nastro o da disco. Dovrai conservare 
una copia del tuo programma, se non vorrai copiarlo ogni 
volta che Lo devi usare. Impara ad usare le funzioni di “edi- 
ting" della tua macchina. Come puoi correggere un errore? 
Puoi sempre ricopiare la lìnea e In questo caso devi sapere 
come procedere. Sapresti come inserire ì caratteri in “inver- 
se", i caratteri minuscoli e quelli di controllo? 

Tutto ciò è spiegato nel manuale del calcolatore. 

Un vdott ripasso 

1) Copia il programma una linea alla volta, con ordine. 
Premi RETURN alla fine di ogni linea. Usa il tasto “DEL” 
per correggere gli errori, 

2) Confronta la linea copiata con quella presente nella rivi 
sta. Puoi controllare l’ intero programma nel caso in cui 
si presenti un errore quando eseguì il RUN. 

3) Accertati di aver inserito le istruzioni tra parentesi graffe 
con gli appropriati caratteri di controllo (fai riferimento 
alla “Pìccola guida per l'input dei programmi" che trovi 
in questa stessa rivista). 

Siamo spiacenti di non poter rispondere singolarmente alle 
richieste di informazioni circa i programmi, prodotti o servizi 
apparsi su SUPERCOMMODORE, 
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ABC del Linguaggio macchina: 



parte seconda 


di IJ. G, Barzaghi 

Nella seconda puntata del nostro 
breve itinerario attraverso le 
lande inesplorate del linguaggio 
macchina affronteremo due nuo- 
vi argomenti* di fondamentale 
importanza: gli operatori logici 
ed ì formati di indirizzamento 
del microprocessore 6S02. 


C ome promesso nell articolo prece- 
dente, anche questi concetti saran- 
no illustrati da un programma pratico* 
realizzato servendosi dell'assemblatore 
"Supermcinitor" comparso sul numero 
1 di "SUPERCOMMODOREL In que- 
sto caso non si tratterà (come nella pri- 
ma parte del nostro breve corso di lin- 
guaggio macchina, apparsa sul numero 
precedente) di un banale programma 
teorico* ma di una comoda routine che 
potrete Incorporare nei vostri program 
mi, utilizzando le tecniche illustrate nei 
l'articolo, e che consentirà di aggiorna- 
re la posizione degli sprite oltre La due- 
cent ©cinquanta c in qu esima colonna (in 
alta risoluzione) dello schermo* evitan 
do quel fastidioso fenomeno di “lam- 
peggio”. ben noto a chi abbia familiarità 
con gli sprite, inevitabile in BASIC, 

Operatori logici e iprite 

Una delle ragioni che ci ha spinto all'ac 
quisto di uri C64 era, senza alcun dub- 
bio. rappresentata dalla possibilità di di- 
sporre di otto “aprite". Fin dai tempi m 
cui la ** Alari* introdusse i concetti dì 
“player" e “missile" nella programma- 
zione dei personal computer, tutti i prò 
gommatori dediti alla realizzazione di 
video-giochi e simulazioni non hanno po- 
tuto fare a meno di pensare quali fosse 
ro le potenzialità offerte da questo siste- 
ma 

Non vorremmo* però, che sottovaluta- 
ste questa funzione del vostro calcolato- 
re, considerandola alla stregua di un ba 
naie “gadget’ 11 da sala-giochi. Le possibi- 
lità offerte dagli sprite sono molto piu 
vaste Ad esempio, è possibile utilizzar- 


li, fissi In una determinata posizione, per 
definire dei simboli matematici (somma 
torta* integrale* radice quadrata, ecc) 
che per le loro dimensioni sono difficil- 
mente rappresentabili senza far ricorso 
ad! una rìdefinizione completa del sei di 
caratteri. 

Questa opzione viene, comunque, sfrut- 
tata integralmente nella realizzazione di 
programmi di animazione grafica, ìt che 
non significa necessariamente vldeoga 
me. Nel nostro caso particolare si trat- 
tava di arricchire ed esemplificare grafi- 


camente un programma che simula V an- 
damento del flusso dì clienti di un auto- 
noleggio. realizzato per un numero 
monografico sulla simulazione pubblica- 
to dalla rivista “Bit" del Gruppo Edito- 
riale Jackson, ' 

Nel programma la vettura, noleggiata 
ad un nuovo diente* viene fatta uscire 
dal parcheggio delfautonoleggio fino a 
scomparire dal lato destro dello scher- 
mo. Terminato il periodo di noleggio 
essa viene fatta rientrare dalla sinistra 
Il problema pratico che ci si poneva, 
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risolto dal programma in linguaggio 
macchina qui illustrato, consisteva nella 
attivazione dello aprite in movimento ol- 
tre la 255-esima ascissa X senza che lo 
aprite stésso “lampeggiasse''. 

Per coloro che non avessero familiarità 
con l’argomento spiegheremo breve- 
mente il problema, il C64 consente di 
attivare 8 sprite o animazioni, la cui for- 
ma viene definita da 63 valori numerici 
contenuti in blocchi fissi di 64 byte (il 
64-esimo byte ha quindi solo funzioni dì 
riempimento}, contenuti nella stessa pa- 
gina di memoria avente una lunghezza 
di 16 Kbyte “vista" dal chip di gestione 
della grafica VIC II Ciò significa, piu 
dettagliatamente, che i dati che defini- 
scono la forma degli sprite e la memoria 
di schermo devono essere contenuti nel- 
lo stesso blocco di L6 Kbyte=16384 by- 
te, il che consente, in teoria, di definire 
la forma di 256 sprite differenti {identifi 
cati dai valori numerici compresi tra 0 
e 255). 

Gli otto sprite disponibili individuano la 
propria forma “puntando " uno dei 256 
blocchi da 64 byte della pagina da 16 
Kbyte con il proprio registro. Questi ot- 
to registri rappresentano la sofà parte 
del controllo degli sprite, se si esclude 
la loro forma, che deve risiedere nella 
stessa “ pagina" di memoria della me- 
moria di schermo. Net caso in cui qtie- 
sf ultima occupi le locazioni da 1024 a 
2024 nella prima “pagina 1 " da 16 Kbyte 
(cioè le condizioni all’accensione del cab 
colatore) i registri per gli sprite sono 
rappresentati dalle locazioni da 2040 a 
2047 (2040 indica la forma dello sprite 
0, 2047 quella dèlio sprite 7), Se spo- 
stassimo la memoria di schermo al quar- 
to banco di memoria (ad esempio per- 
ché desideriamo ridefinire l’intero set di 
caratteri} a partire dalla locazione 
51200, la memoria di schermo termine- 
rebbe in 52200 ed \ puntatori alla forma 
degli sprite occuperebbero gli ultimi ot- 
to byte del blocco da 1 Kbyte che con- 
tiene la memoria di schermo, vale a dire 
da 52216 a 52223. 

Oltre a questa parte “rilocabile", cioè 
trasferibile insieme alla memoria di 
schermo, dei registri degli sprite, abbia- 
mo una serie di registri che ne definisco- 
no altri aspetti e che risiedono in loca- 
zioni fisse della memoria controllate dal 
chip VIC II. Sìa detto per inciso, bisogna 
fare molta attenzione quando si inseri- 
scono in memoria i valori numerici che 
definiscono la forma degli sprite a non 
interferire con queste ed altre locazioni 
“fisse" riservate al sistema operativo 
del calcolatore. Ciò significa che dei 
256 possibili blocchi di 64 byte che 
compongono un pagina non tutti saran- 
no sempre disponibili per ospitare le no- 
stre animazioni; si renderà perciò neces- 
sario un accurato lavoro di pianificazio- 
ne “sulla carta" della mappa di memo- 
ria del nostro Commodore, stabilendo 
a priori quale blocco di 16 Kbyte si desi- 
dera controllare e quali locazioni di me- 
moria siano destinate a uno o più 
“schermi"' (la memoria colore è fissa al- 



Fig. 1 — How chart 


le locazioni 55296-56295}, quali ad un 
eventuale set di caratteri personalizza- 
to, memoria a mappa di bit (alta risolu- 
zione) o, appunto, definizione della for- 
ma degli sprite, 

1 registri di controllo degli sprite occupa- 
no le locazioni da 53248 a 53294 del 
chip VIC 11, ma ad esse sono mischiati 
altri registri (come i puntatori alla map- 
pa di memoria e i registri di richiesta 
delle interruzioni - Interrupt ReQuest, 
IRQ - e la maschera del registro delle 
interruzioni — Intérrupt Requést Mask, 
IRM — } che nulla hanno a che fare con 
le animazioni. 

I primi 16 registri contengono le coordi- 
nate degli sprite: la locazione 53248 
contiene V ascissa X dello sprite 0 e la 
locazione seguente l'ordinata Y dello 
sprite 7, e così via fino alle 53262- 
53263, che contengono le coordinate 
dello stesso sprite. Come abbiamo visto 
nel numero precedente, la parola di me- 
moria, cioè il numero di bit che compon- 
gono una locazione di memoria (di cui il 
microprocesore 6502 dispone), è com- 
posta da 8 bit, il che consente di definire 
valori numerici compresi tra 0 e 
2t8- 1=255. 

Ciò non costituisce un problema per 
l’ordinata Y degli sprite, dal momento 
che l’area visìbile dello schermo, in sen- 
so verticale, si estende dalla cinquante- 
sima alla duecentocinquantesima riga di 
scansione del video. 

Rappresenta, invece, un effettivo incon- 
veniente per quanto riguarda la posizio 
ne orizzontale delle animazioni, dal mo- 
mento che, in questo senso, l'area visibi- 
le comprende le colonne di pixel (cioè 
le singole locazioni identificabili sullo 
schermo) da 24 a 343. 


Poiché non è possibile contenere intera 
mente l’ascissa delle singole animazioni 
nell'apposita locazione ad essa desti- 
nata. si è adottato un semplice espe- 
diente. È stato definito un ulteriore regi- 
stro, in 53264. i cui otto bit stabiliscono 
se I’ ascissa dello sprite corrispondente 
debba intendersi in senso assoluto o a 
meno di uno scarto pari a 255 pixel. 
Tutto ciò sembrerà molto più chiaro con 
un semplice esempio: supponiamo che 
l'ascissa dello sprite 0. in 53248, e quel- 
la dello sprite ì, in 53250, contengano 
entrambe il valore numerico 45 e che 
la configurazione del registro 53264 sia 
la seguente: 


Locazione 53264 


Bit 7 6 5 4 3 2 1 0 

?????? Gl 

In questo caso all’ ascissa dello sprite 

0 va aggiunto 255 (il bit corrispondente 
de) registro 53264 è posto a uno), men- 
tre quella dello sprite 1 vale effettiva- 
mente 45 (il bit 1 del registro suddetto 
è nullo). In pratica, lo sprite 0 sarà po- 
sto in 2 55 + 45 = 300, mentre lo sprite 

1 si troverà effettivamente in 45. 

11 problema del lampeggio” dello spri- 
te T cui il nostro progiamma in linguag- 
gio macchina intende ovviare, insorge 
nel caso in cui Io sprite venga spostato 
lungo lo schermo ed “attraversi" la fron- 
tiera rappresentata dalla 255-esima po- 
sizione, sia da sinistra verso destra (x 
crescenti) che in senso opposto (x de- 
crescenti). 

Le operazioni richieste nel primo caso 
sono le seguenti: attivazione del bit del 
registro 53264, corrispondente allo 
sprite che attraversa la frontiera (la- 
sciando invariata la configurazione re- 
stante I), ed azzeramento dell" ascissa X 
dello sprite. In qualsiasi ordine queste 
operazioni vengano eseguite risultano, 
in BASIC, troppo lente per impedire Sa 
comparsa dell'effetto “lampeggio". Ve- 
diamo in dettaglio cosa succede: s upper 
niamo che lo sprite 0 attraversi la fron- 
tiera da sinistra verso destra La sua 
coordinata X viene incrementata fino a 
raggiungere il valore 255. A questo 
punto un ulteriore incremento del- 
l’ascissa, ed un tentativo di inserire il 
valore 256 nella locazione 53248, pro- 
vocherebbe una segnalazione di errore; 
un test che stabilisca il raggiungimento 
di queste condizioni dovrebbe attivare 
un sottoprogramma che svolga, per Io 
sprite in questione, le due operazioni 
specificate più sopra: per azzerare 
l'ascissa è sufficiente V istruzione. 

POKE 53248,0 

mentre per attivare il bit 0 della locazio- 
ne 53264, lasciando invariati i bit re- 
stanti, è necessario utilizzare una istru- 
zione un po' più complessa 
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figura 2. a - Istruzione di rotazione a sinistra ROL 
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Figura 2-b - Istruzione di rotazione a destra ROR 



Figura 2*c — Istruzione di scorrimento a sinistra ASL 


POKE 53264. PEEK (53264) ORI 

Nel caso di un generico aprite con tra d 
distinto dalla variabile SP {0 < — SP < 
= 7) le due istruzioni suddette assumo- 
no la forma 

POKE 53248+SP‘2.0 

POKE 53264,PEEK(53264)OR2tSP) 

Il problema è rappresentato dall inter 
vallo di tempo tra la prima e la seconda 
istruzione NelL’ordlne indicato l'ascissa 
viene azzerata e, non essendo ancora 
attivato il bit opportuno della 53264, lo 
sprite "scompare" dallo schermo (non 
è compreso nell’area visibile); l'attiva- 
zione del bit fa “ricomparire" lo sprite, 
provocando II lampeggio. Invertendo 
l'ordine dei fattori il prodotto non cam- 
bia... Attivando per primo il bit della 
locazione 53264 lo sprite ha un'ascissa 
pan al valore contenuto nella locazione 
destinata allo scopo {nel nostro caso 
255L più d uecen tocinquant ac i nq ue . 
uscendo, ancora una volta, dal campo 
visibile o, nel caso in cui si incrementi 
l'ascissa per valori maggiori di uno, “sai 
tando" nel migliore dei casi in una posi- 
zione visibile, ma 255 pixel più a destra 
lungo lo schermo. Azzerando quindi 
l'ascissa si riporta lo sprite nella posizio- 


ne desiderata, ma si ottiene ancora una 
volta il lampeggio. 

Che questo fastidioso effetto sia risolvi- 
bile con un semplice aumento della ve- 
locita di esecuzione delle due operazioni 
è facilmente dimostrabile. Come è noto, 
l'occhio umano non è in grado di disi in 
guere due immagini che si susseguono 
sulla retina in un tempo inferiore al deci- 
mo di secondo (la qual cosa ha presumi- 
bilmente a che fare con la velocità di 
composizione delle immagini del nostro 
apparato visivo); su questo semplice 
principio sì basano la cinematografia, i 
cartoni animati e la televisione. Se il 
vostro occhio fosse piu “veloce", guar- 
dando lo schermo del monitor del vo- 
stro calcolatore potreste vedere effetti- 
vamente il pennello elettronico (cioè il 
fascio di elettroni del tubo catodico) che 
compone l'immagine sullo schermo (co 
me è possibile notare in una ripresa, 
non sincronizzata, di un apparecchio te- 
levisivo da parte di una telecamera). 
L'impiego del linguaggio macchina con- 
sente, quindi, di risolvere il nostro pro- 
blema. Esamineremo in dettaglio l'at- 
traversamento della frontiera a “quota 
255" da sinistra a destra, quindi modifi- 
cheremo Il programma, in modo che 
possa essere utilizzato anche per lo spo- 
stamento in senso inverso. Prima, però. 


dobbiamo approfondire le nostre cono- 
scenze sugli operatori logici di cui il 
6502 dispone. 

And, Or « Eor 

Probabilmente conoscete già almeno 
due degli operatori logici posseduti dal 
microprocessore 6502, dal momento 
che essi sono disponibili anche in BA 
SfC: AND e OR. 

L'operatore AND. o prodotto logico, 
può essere paragonato al collegamento 
in serie di due interruttori È sufficiente 
che l'uno o l'altro di essi sia disinserito 
perché l'uscita sia nulla, cioè la “lampa 
dina" rimanga spenta. 

Trasferendo il ragionamento dall elei 
trotecmca all'Informatica, è sufficiente 
che uno qualsiasi dei due bit cui l'opera- 
tore viene applicato sia nullo perché il 
risultato del prodotto logico dei due bit 
sia nullo. Questo discorso può essere 
riassunto nella seguente “tabella della 
verità" 

primo bit 

0 1 

ODO 

secondo bit ini 


Applicando l'operatore logico AND a 
due locazioni si ottiene il prodotto logico 
del loro contenuto. Ad esempio 

Bit 7 6 5 4 3 2 1 0 

Loc A 1 0 0 1 0 3 1 0 

Loe B 110 0 110 1 

A AND B 1 0 0 0 0 1 0 0 

Nel caso del microprocessore 6502 una 
delle due locazioni coinvolte nella ope- 
rinone di prodotto logico sarà sempre 
rappresentata dall'accumulatore, men- 
tre è possibile specificare, nei formati 
che incontreremo nel proseguo dollari i 
colo, il secondo elemento del l'opera zio 
ne. 

L’operatore OR. o somma logica, può 
essere paragonato, tanto per mantene- 
re l’analogia elettrotecnica, al collega- 
mento in parallelo di due interruttori 
(per avere l'accensione della lampadina 
è sufficiente che uno o l'altro, o entram- 
bi gli interruttori siano inseriti) ed ha la 
tabella della verità seguente 

primo bit 

0 1 

secondo bit 1 ? 1 

Applicando l'operatore OR alle stesse 
due locazioni del caso precedente si ot- 
terrebbe quindi 

Bit 7 6 5 4 3 2 1 0 

Loc. A 1 0 0 1 0 1 I 0 

Loc. B 110 0 110 1 

A OR B 1 1 0 1 1 1 1 1 

Anche in questo caso l'operatore OR 
(o. come si dovrebbe specificare, OR 
Inclusivo) prevede, nella forma fornita 


SUPEftCOMMODOBE* V« 15 


da] 6502 - ORA -, che uno dei due 
operandi sia rappresentato dal contenu- 
to dell'accumulatore 

Per descrivere il funzionamento del- 
l'operatore logico EOR, o OR esclusivo, 
di cui dispone 0 microprocessore su cui 
il C64 si basa. Tunica analogia che cl 
sovviene è la costruzione delle frasi ne- 
gative di certe lingue (ad esempio ingle- 
se, tedesco, latino e, se non ricordiamo 
male, anche il greco), nelle quali una 
doppia negazione afferma. Perché 11 ri- 
sultato dell’operazione sia unitario, in- 
fatti. è necessario che uno o i’altro dei 
due operandi, MA NON ENTRAMBI, 
sìa uguale a uno La tabella della verità 


corrispondente 

è la seguente 




primo 

bit 


0 

1 

0 

1 

secondo bit 

0 

1 

1 

1 

ed il risultato 

dell'operazione 

di 


-esclusivo applicata alle locazioni del no- 
stro esempio sarà quindi il seguente 

Bit 7 6 5 4 3 2 10 

Loc A 10 0 10 110 

Loc. B 110 0 110 1 

A EOR B 0 1 0 1 1 0 1 1 

Nel nostro programma non ci serviremo 
dell’opera tore OR esclusivo, abbiamo 
ritenuto però opportuno menzionarlo 
per completezza 

Qual è Futilità degli operatori introdot- 
ti? Come abbiamo già visto neli'esem 
pio BASIC di attivazione di un particola- 
re bit della locazione 53264, (^operato- 
re OR [in codice mnemonico A$$EM 
RI.Y ORA) consente di settare, cioè 
porre a uno. un particolare bit senza 
alterare il contenuto degli altri hit che 
compongono una determinata locazio- 
ne: supponiamo che la configurazione 
della locazione 53264 sia la seguente 

Bit 7 6 5 4 3 2 1 0 

53264 0 1 1 1 0 1 0 1 

e che si debba set tare il bit 1, corrispon- 
dente allo sprite 1 Per ottenere ciò è 
Sufficiente applicare Toperatore ORA 
al contenuto della locazione indicata, 
fornendo come secondo operatore un 
byte che abbia tutti i bit a zero, tranne 
il bit 1 . V/ale a dire: 

Bit 7 6 5 4 3 2 1 0 

53264 0 1 1 1 0 1 0 1 

Maschera 0 0 0 0 0 0 l 0 

OR 01110111 

Ne] caso BASIC il contenuto della loca- 
zione 53264 veniva letto con l'istruzio- 
ne PEEK (53264), cui veniva applicato 
l'operatore OR. Le funzioni della ma- 
schera venivano svolte dalla funzione 
2 SP* In cui SP era La variabile che sden 
tificava lo sprite: nel nostro caso 
2tl= s 2, vale a dire il valore numerico 
decimale corrispondente alla codifica 
binaria della maschera utilizzata. 


Se volessimo settate contemporanea 
mente i bit 3 e 7 della locazione 53264, 
dovremmo utilizzare l'istruzione BA- 
SIC 

POKE 53264, PEEK (53264) OR 
f2T3+2T7) 

sintetizzabile in 


sa Riva re due o piu bit contemporanea- 
mente, dovremmo sottrarre da 255 la 
somma del loro pesi per ottenere la ma- 
schera opportuna 

Per poter realizzare il nostro program 
ma in linguaggio macchina dovremo 
però occuparci ancora di un elemento: 
le istruzioni di rotazione e scorrimen- 
to. 


POKE 53264, PEEK (53264) OR 136 Rol* Ror e Asl 


Infatti 136 corrisponde alla codifica bi- 
naria 

Bit 7 6 5 4 3 2 1 0 

Peso 128 64 32 16 8 4 2 1 

Cottf. 10 0 0 1 0 0 1 

L'operatore AND ha funzioni esatta- 
mente opposte. Tramite l'uso d] una 
maschera opportuna, permette infatti 
di disattivare un determinato bit di una 
determinata locazione, lasciando intatti 
gli altri. 

Il formato della maschera è intuitivo: 
essa deve presentare un 1 in ogni posi- 
zione, tranne che in quella che si deside- 
ra disattivare; essa sarà quindi il com- 
plemento a uno della maschera utilizza 
ta per settare quello stesso bit (il com- 
plemento a uno si ottiene cambiando 
ogni I di un byte in 0 ed ogni 0 In 1|. 
Per disattivare il bit 3 della locazione 
53264 dovremmo quindi applicare 
l'operatore AND al contenuto della lo- 
cazione con la maschera 


Bit 7 6 5 4 3 2 1 0 

Peso 128 64 32 16 8 4 2 1 

Coni 1 1 1 1 0 1 I 1 

La codifica decimale corrispondente al 
la maschera è quindi uguqle a 247 o. 
Se SP è uguale a 3, 255-2 SP L’istru- 
zione BASIC che consente di azzerare 
11 bit corrispondente allo sprite SP è 
quindi la seguente 

POKE 53264, PEEK (53264) AND 
(255 2tSP) 


Anche in questo caso, se volessimo di- 



Le istruzioni di rotazione e scorrimento 
dì cui il microprocessore 6502 dispone 
sono le tre indicale nel titolo del para- 
grafo Le prime due (ROL, ROtate Left, 
rotazione a sinistra e ROR, ROtate 
Righi, rotazione a destra) consentono di 
spostare di una posizione nella direzio- 
ne indicata gli otto bit che compongono 
Il byte cui l'istruzione è applicata (è pos- 
sibile specificare un indirizzo assoluto, 
in pagina zero o, per default , far ruotare 
il contenuto dell'accumulatore), facen- 
do cadere il bit estremo nella locazione 
normalmente destinata a contenere il 
riporto (Carry). il cui contenuto viene 
inserito in corrispondenza del bit lascia- 
to libero dallo scorrimento. In pratica 
l’operazione ha L'aspetto mostrato in fi- 
gura 2,a T per quanto riguarda l'istruzio- 
ne ROL, ed in 2.b per la ROR 
La terza istruzione (ASL, A ri th mette 
Shift Left. scorrimento aritmetico a sini- 
stra) consente lo spostamento dei primi 
sette bit di un byte di una posizione 
verso sinistra, mentre l'ottavo va a ca- 
dere nel Carry, ma, contrariamente al 
l'istruzione ROL r il bit meno significati- 
vo, lasciato libero dallo scorrimento, 
viene arbitrariamente rimpiazzato da 
uno zero (vedi figura 2.c). 

Una prima funzione per cui si può pensa- 
re di utilizzare le istruzioni suddette è, 
intuitivamente, rappresentata dalla possi- 
bilità di posizionare opportunamente 
una determinata configurazione di bit, 
ad esempio quella necessaria per svol- 
gere le funzioni di "maschera" per una 
istruzione AND o ORA (e, in effetti, ce 
ne serviremo proprio per posizionare il 
singolo bit necessario per attivare il bit 
corrispondente allo sprite prescelto del 
la locazione 53264 o, nel secondo sotto- 
programma, per far scorrere in corri- 
spondenza deilo stesso bit lo 0 necessa- 
rio per disattivarlo). 

Una seconda e, se vogliamo, piu impor- 
tante funzione, quanto meno più ricca 
di implicazioni, è rappresentala dal- 
Ta spetto aritmetico dello scorrimento 
verso destra o verso sinistra di tutti i bit 
di un byte. Vediamo di chiarire con un 
semplice esempio: supponiamo che 
l'accumulatore contenga la seguente 
configurazione binaria 

Bit 7 6 5 4 3 2 1 0 

Peso 128 64 32 16 8 4 2 1 

Conf 0 0 0 1 0 1 0 1 

Il valore decimale corrispondente alla 
configurazione binaria rappresentata 
(dato dalla somma dei pesi di ogni singo- 
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lo bit) è uguale a 21. Se al contenuto 
attuale dell'accumulatore applichiamo 
una istruzione A5L. la configurazione 
che otterremo sarà la seguente: 

Bit 7 6 S 4 3 2 1 0 

Peso 128 64 32 16 8 4 2 l 

Conf, 0 0 10 10 10 

in cui tutti i bit settati a uno si sono 

spostati di una posizione verso sinistra 
e in corrispondenza del bit meno signifi- 
cativo è stato forzato uno zero, mentre 
lo zero contenuto nel bit 7 T 11 più signifi 
estivo, è ora contenuto nella locazione 
destinata al riporto. La codifica decima- 
le della nuova configurazione binaria è 
uguale a 42-21*2. Ciò significa che lo 
scorrimento del contenuto di un deter- 
minato byte di una posizione verso sini- 
stra equivale a raddoppiarne il valore. 
Purtroppo il microprocessore 6502 non 
dispone di una istruzione di scorrimento 
verso destra; & questo scopo è necessa* 
rio utilizzare Istruzione di rotazione 
ROR, facendo attenzione al contenuto 
del Carry {che può essere settato trami 
te r istruzione SEC — SEt Carry — e 
annullato con la CLC - CLear Carry 
-}. In effetti, nel nostro programma ci 
serviremo delle sole istruzioni di rota zio 
ne e di un attento uso della locazione 
di riporto 

Abbiamo quindi scoperto che se voglia 
mo moltiplicare o dividere il contenuto 
del nostro byte per un multiplo di due, 
è sufficiente operare un numero di scor- 
rimenti verso sinistra (se si desidera 
moltiplicare) o verso destra (per divide- 
re) pari al logaritmo in base 2 del molti 
pficatore o del divisore, vale a dire quel 
valore numerico a cui è necessario eie 
vare la base due per ottenere il valore 
del moltiplicatore o divisore stesso. 
Operando gli scorrimenti passo -passo, 
e registrando opportunamente il conte- 
nuto del bit di riporto, è possibile com- 
piere operazioni aritmetiche più com- 
plesse. 

Ci serviremo anche di questa nozione 
per realizzare il nostro programma di 
utilità pratica 

Come progettare il 
programma desiderato 

La prima decisione che è necessario 
prendere consìste nello stabilire dove 
inseriremo la codifica decimale del codi 
ce mnemonico ASSEMBLY del nostro 
programma. Nel nostro caso la loca zio 
ne più opportuna sembrava essere rap 
presentata dal blocco da 1 Kbyte al di 
sotto della memoria di schermo del no 
stro programma (in 51200). Sfortunata 
mente la stessa zona di memoria è occu 
pata da parte del codice macchina de! 
programma assemblatore "Supermoni- 
tor 1 *. che desideravamo utilizzare per la 
realizzazione e la messa a punto del sot- 
toprogramma voluto. 

Ovviamente, una soluzione era rappre 
sentata dalla rilocazione, cioè i! riposi- 
zionamento del programma in linguag 


gio macchina, »n un'area di memoria 
non interessata dal monitor ed il suo 
successivo ritrasferimento nella posizio- 
ne voluta. Ciò avrebbe potuto però 
comportare, a priori, la necessità di ap 
portare ogni volta modifiche agli indiriz 
zi contenuti in alcune istruzioni del prò 
gramma (in realtà il prodotto finito è poi 
risultato interamente rilocabile; gli indi- 
rizzi contenuti nelle istruzioni sono tutti 
relativi, forniscono cioè lo scarto della 
locazione indirizzata rispetto a quella 
contenente l’istruzione, non l'indirizzo 
assoluto). 

Una soluzione relativamente semplice è 
Invece rappresentata dalla nlocazione 
compieta del w Su pe [■monitor" stesso, 
ottenibile seguendo le istruzioni riporta- 
te m calce all'articolo di presentazione 
del programma. 

Ripeteremo la sequenza necessaria per 
coloro che disponessero della sola copia 
del programma, ma non dell'articolo 
nginale. 

necessario. Innanzi tutto, caricare e 
mandare in esecuzione i£ programma 
stesso (per rilocarlo useremo infatti le 
opzioni di cui dispone) 

Quando appare il cursore (.) digitare 

T C000 CFFF 2000 

(ciò consente di trasferire il codice AS- 
SEMBLY contenuto nelle locazioni da 
tCOOO 49152 - a SCFFF - 53247 
- a partire dalla locazione $2000 - 
8192 -) 

.N 2000 2003 6000 CQQG CFFF 
,N 2012 2E6D 6000 C000 CFFF 

(che consentono di rilocare opportuna- 
mente tutti gli indirizzi assoluti contenuti 
nelle due aree delimitate dai primi due 
indirizzi di ogni istruzione) 

N 2FB5 2FFE 6000 COQO CFFF W 

(per ri posizionare gli indirizzi assoluti 
nella tavola dei vettori di “Super moni- 
tor*) È inoltre necessario modificare di 
rettamente il contenuto delle seguenti 
locazioni, utilizzando il comando M: 



Valore 

Muovo 

Locazione 

precedente 

valore 

2018 

C5 

25 

202A 

C3 

23 

2322 

CF 

2F 

2392 

CC 

2C 

2649 

C5 

25 

2701 

C5 

25 

28A7 

C3 

23 


Dopo aver completato queste operazio- 
ni è possibile salvare la versione ri locata 
del programma con 

.S 2000 3000 "SUPERM $2000 " 

ù con 


S 2000 3000 “SUPERM $2000" 08 

Il nuova programma verrà mandato in 
esecuzione con l'Istruzione 5YS8I92, 

Il programma, finalmente.,. 

Possiamo ora (!) passare alla effettiva 
realizzazione della nostra routine in lin 
guaggio macchina Una prima operazio- 
ne è rappresentata dalTinterfacclamen 
lo tra il Sottoprogramma ed il program 
ma BASIC che sfrutta i! sottoprogram- 
ma stesso. Come abbiamo visto nell'ar- 
ticolo precedente, è possibile ''passare" 
dei parametri, utilizzando come archi- 
vio una locazione di memoria convenu- 
ta Mentre nel programma di somma a 
8 bit visto in precedenza abbiamo utiliz 
zato un formato di indirizzamento “as- 
soluto" (con un indirizzo, cioè, compo- 
sto da due parole dì otto bit, che con 
sentono dì indirizzare l'intera memoria 
disponibile), sfrutteremo in questo caso 
un formato di indirizzamento più “bre 
ve" e. pertanto, piu "veloce" Si rende 
necessaria, a questo punto, una breve 
spiegazione dei vari formati di indirizza- 
mento e dei loro effetti sul funzionamen- 
to del calcolatore 

I) ciclo di esecuzione di una istruzione 
di codice ASSEMBLY si può suddivide- 
re in tre parti 

1 - Prelievo della nuova istruzione 

(fase dì “fetch") 

2 - Decodifica deiristruzìone 

3 - Esecuzione dell'Istruzione 

La prima parte consiste nell'invio de) 
contenuto del registro Program Coun- 
ter (contatore di programma), compren- 
dente l'indirizzo deiristruzìone correo 
te, sul bus indirizzo e l'invio di un segna 
le di lettura sul bus di controllo. Questa 
serie dì operazioni consente di ottenere 
la prima parola di otto bit della nuova 
istruzione, parola che caratterizza 
l'istruzione stessa, identificandone an- 
che il formato di indirizzamento. 

Le fasi di decodifica e di esecuzione 
hanno una lunghezza, contrariamente 
alla fase di fetch, dipendente dal forma- 
to di indirizzamento dell’istruzione, Ab- 
biamo già avuto modo di incontrare due 
tipi di istruzioni: quelle che operano su 
dì uri registro convenuto del mieropro 
cessore, per le quali non è necessario 
specificare un indirizzo, il cui codice è 
contenuto in un solo byte, e quelle che 
operano su di una generica locazione di 
memoria, per le quali il codice dell'istru 
none deve essere seguito dai due byte 
dell'indirizzo (suddivisi in byte meno e 
più significativo). I due formati prece- 
denti prendono :l nome, rispettivamen- 
te, di in di ri zzarci ènto implicito ed indiriz- 
zamento assoluto. 

Non è però indispensabile impiegare 
due byte per specificare un indirizzo di 
memoria. Come abbiamo visto, otto bit 
consentono di rappresentare ìn formato 
binario i valori numerici decimali da 0 
a 255. Limitando 1 nostri indirizzi a que 
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Pigiar a 3 - Listato del primo programma ASSEMBLV 


$C400 

CLC 


$C401 

LDA 

$FB 

$C403 

ROL 


$C404 

TAX , 


$C405 

LDA 

#$00 

$C407 

STA 

$D00G, 

< 

o 

u 

TXA 


$C40B 

ROR 


ÌC40C 

TAX 


SC40D 

JNX 


$C40E 

LDA 

#$01 

SC410 

ROR 


$C4 1 1 

ROL 


ÌC4J2 

DEX 


ÌC413 

BNE 

SC411 

ÌC415 

ORA 

$D010 

$C418 

STA 

$D010 

SC41B 

RTS 



-.azzera SJ riporto 

icarica in accumulatore il contenuto delta loca’ 
zkrne 251 
;rotaz. a sinistra 

trasferisce II contenuto dell' ’acaim datore nel 
registro X 

;viene azzerato ]'ac cumulatore 
;iì contenuto dell'accumulatore viene registrato 
netta locazione di indirizzo 53248 + X 
trasferisce 11 contenuto del registro X in accu- 
mulatore 
;rotaz. a destra 

;inc rementa di uno il contenuto del registro X 
.carica I in accumulatore 


; decrementi di uno il contenuto del registro X 
;nel caso In cui lì bit Z del registro di flag non 
sia attivato, si ricicla a partire dalla locazione 
JC4I1 

; vi e ne eseguita La somma logica dell'accumula- 
tore e dell indirizzo 53264 ($0010} 

;t! risultato delta operazione precedente viene 
remserito nella locazione 53264 
;sì rientra in ambiente BASIC 


sto campo di valori è possibile ottenere 
istruzioni più * brevi" e quindi, come ab- 
biamo detto, più ^veloci" Questo gene- 
re di indirizzamento prende il nome con- 
venzionale di ''pagina zero*- lindi rizza- 
rne nto utilizzato fa cioè a meno del byte 
più significativo {che viene assunto, per 
Convenzione, uguale a zero; da qui ìE 
nome di pagina zero — per pagina si 
intende, infatti, la serie di locazioni indb 
rizzabile con una sola parola dì memo 
ria-) 

L'inconveniente principale presentato 
da questo formato di indirizzamento è 
costituito dal relativo "affollamento'' 
della pagina zero, che contiene gran 
parte delle locazioni utilizzate dal siste 
ma operativo e dallìnterprete BASIC 
(entrambi hanno pressanti esigenze di 
velocità). Per i nostri scopi, comunque. 
Le poche locazioni disponibili, da 251 a 
255 e la solitaria locazione 2, saranno 
sufficienti. 

Supponiamo quindi di utilizzare come 
locazione di interfacciamento la 251. in 
cui inseriremo da programma BASIC, 
con una istruzione PGKE, 1 ìndice corri- 
spondente allo sprite (da 0 a 7) di cui 
si desidera azzerare T ascissa X e se tia- 
re il bit corrispondente del registro 
53264. 

La prima Istruzione dei nostro program- 
ma (Li cui listato è visibile in figura 3). 
ad indirizzamento implicito, consente di 
azzerare la locazione di riporto (Carry) 
in vista di successive operazioni di scor- 
rimento e rotazione. 

L'istruzione successiva consentirà di ca 
ricare il contenuto della locazione pre 
scelta di pagina zero in accumulatore. 
Come abbiamo visto nei paragrafi pre 
cedenti, è possibile moltiplicare per due 


il contenuto di un byte, semplicemente 
facendolo scorrere di una posizione ver 
so sinistra Lo scarto dell'Indirizzo della 
locazione destinata ad ospitare l'ascissa 
dello iprite di indice $P„ rispetto allìn- 
dirizzo di base dei registri degli sprite - 
53248 -, è dato, come detto, da 5P‘2. 
L’istruzione ROL consente quindi di ri- 
cavare lo scarto suddetto dall'indice 
dello sprite Letto nella istruzione prece 
dente, mentre la successiva TAX trasfe- 
risce il contenuto dell'accumulatore nel 
registro X. 

L’istruzione LDA #$00 utilizza il for- 
mato di indirizzamento immediato “bre 
ve” (contraddistinto dal prefisso # ) per 
caricare in accumulatore il valore ne- 
cessario ad annullare l'ascissa dello 
sprite desiderato. Questa funzione vie- 
ne implementata tramite un ulteriore 
formato di indirizzamento, chiamato in- 
dicizzato da registro, consistente nel 
sommare ad un indirizzo di base specifi- 
cato il contenuto di un registro implicita 
mente indicato. Nel nostro caso si som- 
merà all'indirizzo di base 53248 
(SDOGO, in esadedmale) il contenuto 
del registro X (pari a 2"SP, come abbia- 
mo visto). 

Queste prime sei istruzioni realizzano il 
primo dei due obiettivi che ci eravamo 
proposti: azzerare l’ascissa dello sprite 
indicato. Vediamo ora come implemen- 
tare il secondo obiettivo. 

Dovremo, innanzitutto, riparare ai 
"danni” fatti dalle istruzioni precedenti. 
IL contenuto dell'accumulatore è infatti 
ora nullo, mentre in X abbiamo il dop 
pio del valore dell'indice. Il nostro obiet 
rivo immediato sarà quindi quello di ri- 
costruire lìndrce dello sprite in questio- 
ne. in modo che possa essere utilizzato 


dal resto del programma. 

L'istruzione TXA trasferisce il contenu- 
to del registro X in accumulatore; la 
successiva ROR lo divide per due, tra- 
mite una rotazione verso destra, riotte 
nendo il valore originale dell'indice. Es- 
so viene ritrasferito nel registro X (che 
verrà utilizzato come contatore del ciclo 
di scorrimento dell' ac cumula tot e. me- 
diante il quale verrà posizionato correi 
lamente il bit della maschera utilizzata 
dalla istruzione di somma logica) 

Il contenuto del registro X viene incre 
meritato di 1 tramite l'istruzione INX 
in formato di indirizzamento implicito, 
in modo da comprendere anche il caso 
in cui si desideri attivare il bit 0. 

Viene quindi caricata in accumulatore 
la maschera di partenza, rappresentata 
da un byte interamente composto da bit 
nulli, tranne il meno significativo 
L'istruzione ROR fa scorrere verso de- 
stra il contenuto dell'accumulatore, in 
pratica azzerandolo, poiché il bit in posi- 
zione 0 cade nella locazione destinata 
ad ospitare il riporto Questa istruzione 
ha lo scopo di neutralizzare la seguente 
istruzione, simmetrica,, di scorrimento 
verso sinistra che sposterebbe la ma- 
schera di una posizione a sinistra rispet- 
to a quella voluta. 

Non è possibile ovviare a questo incon- 
veniente semplicemente decrementan* 
do di uno il limite superiore del contato- 
re (in pratica eliminando l'Istruzione 
INX), poiché il test di terminazione del 
ciclo viene effettuato al termine della 
operazione di scorrimento, che viene 
quindi eseguita, comunque, almeno una 
volta: ciò porterebbe ad un errore nel 
caso delio sprite 0, poiché lo sposta- 
mento della maschera verso destra atti- 
verebbe il bit l f prima dell'interruzione 
del ciclo. 

L'istruzione ROL ripristina la configura 
zione di partenza (bit meno significativo 
attivato) facendo ruotare verso sinistra 
ogni bit e caricando nel bit così liberato 
j) contenuto del Carry (uguale a uno, 
poiché contenente il bit della maschera 
fattovi cadere dalla istruzione prece- 
dente di scorrimento verso destra). 

Il contenuto del registro X viene quindi 
deerementato di una unità; questa ope- 
razione, oltre che sul registro X utilizza- 
to come contatore, agisce su due bit del 
registro di "flag”: il bit di riporto C ed 
il bit Z, II primo rimane In pratica nullo 
(dato che il valore contenuto nel regi- 
stro X in origine è, al massimo, pari a 
otto e quindi non vengono mai generati 
riporti, poiché il ciclo viene interrotto 
quando il contenuto del registro rag 
giunge lo zero); per quanto riguarda il 
secondo, esso viene attivato per segna- 
lare che l'ultima operazione eseguita ha 
portato ad un azzeramento della loca- 
zione coinvolta nell'operazione. 

Questo "segnale” viene sfruttato dalla 
successiva istruzione di diramazione. 
BNE (Brandi if Not Equal. salta alla 
locazione indicata, se li risultato della 
operazione precedente è diverso da ze- 
ro), per riciclare alla istruzione di scorri- 
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mento verso sinistra ($C4iI) fino a che 
l'azzeramento del registro-contatore X 
segnala il corretto posizionamento della 
maschera. Come è possibile notare dal 
listato del programma, questa istruzio 
rie utilizza un ulteriore formato di indi- 
rizzamento, che prende il nome di indi- 
rizzamento relativo. Questo formato 
può essere utilizzato tutte le volte che 
la locazione cui il salto è destinato è 
compresa in un blocco dì ampiezza pari 
ad una pagina (255 locazione di memo- 
ria), centrato sulla locazione contenente 
l' istruzione. I valori numerici compresi 
tra 0 e 127 rappresentano diramazioni 
“dirette", cioè a locazioni seguenti quel- 
la contenente distruzione di salto, men 
tre i valori numerici da 128 a 255, vale 
a dire quelli aventi il bit piu significativo 
(bit 7) posto a uno t indicano diramazioni 
Inverse, cioè a locazioni precedenti 
quella corrente ed in cui l'entità del sal- 
to è indicata dalia differenza tra 255 ed 
il valore numerico indicato. Nel caso 
della istruzione di locazione SC413 l'in- 
dirizzo relativo è contenuto nel byte se- 
guente ($C414) e l’entità dei salto 
(255-252) indica una diramazione nega 
ti va alla locazione posta tre posizioni 
prima della locazione attuale, vale a di 
re proprio $C4 1 1 . come indicato dal 
I 1 istruzione. 

Questo tipo di indirizzamento ha a che 
fare con la rappresentazione dei numeri 
negativi in “complemento a due", un 
argomento che non abbiamo ancora 
avuto modo di affrontare Nell'avìcolo 
del mese scorso abbiamo avuto modo 
di vedere come otto bit consentano di 
rappresentare i valori numerici interi 
positivi compresi tra 0 e 255; non abbia- 
mo però affrontato il problema dei nu- 
meri negativi Per poterli individuare so- 
no disponi bill addirittura tre formati In 
aritmetica binaria. Il più intuitivo consi- 
ste nell'ut ilìzzare il bit più significativo 
tome bit di segno, assumendo 0 come 
**+** e 1 come rappresentando il 
valore assoluto de! numero tramite i re 
stanti sette bit. In questo modo è possi 
bile definire valori numerici compresi 
tra -127 (11111111) e +127 

(01111111); notiamo però che lo zero 
ha. in questo formato, due rappresenta- 
zioni (-0- 10000000 e +0=00000000). 
Questo formato, chiamato “binario con 
segno", presenta l'antipatico inconve- 
niente di non funzionare correttamente 
quando si addizionano numeri negativi 
con numeri positivi o numeri negativi 
tra loro. Infatti: 


+7 

0 

0 

0 

0 

0 

1 

1 

1 

-5 

1 

0 

0 

0 

0 

1 

0 

1 

-12 

1 

0 

0 

0 

1 

1 

0 

0 

Bit di segno 









-1 

1 

0 

0 

0 

0 

1 

1 

1 

-5 

1 

0 

0 

0 

0 

1 

0 

1 

+ 12 

[X] 0 

0 

0 

0 

1 

1 

0 

0 


Riporto Bit di segno 


Per ovviare a questi inconvenienti è sta- 
ta introdotta la rappresentazione in 
“complemento a uno"*, in cui ogni nume- 
ro negativo è ottenuto eomplementan- 
do il corrispondente numero positivo, 
cambiandone cioè gli uni in zeri e vice 
versa In questo caso -3 è rappresenta- 
to da 

+3 « GOOOGOll 
-3 = 11111100 

Anche questo formato, però, presenta 
degli inconvenienti per quanto riguarda 
le operazioni di somma algebrica, sia 
tra numeri negativi che tra negativi e 
positivi E però possibile, in questo ca- 
so, ovviare ad eventuali errori, som- 
mando. a operazione conclusa, l’even 
tuale riporto generato dall'operazione . 
Vediamo un semplice esempio 

+7 0 0 0 0 0 1 1 1 

-5 filli 0 1 0 


[IJ 0 0 0 0 0 0 0 1 
II] 


+2 0 0 0 0 0 0 1 0 

il risultato è quindi corretto, Analoga- 
mente 

-7 1 1 1 1 1 Q 0 0 

-5 1 1 1 1 l 0 1 0 


[1) 1 1 1 1 0 0 1 0 

m 


-12 11110 0 11 


Per evitare di dover apportare ad ogni 
somma algebrica la suddetta correzione 
è stata introdotto il formato in “comple- 
mento a due", ottenuto sommando uno 
al formato in complemento a uno dì tutti 
i numeri negativi. In questo caso -3 è 
uguale a 

+3 0000001 I 

Compì 11111100+ 

1 


11111101 


In questo formato le operazioni si svol 
gono correttamente con le normali re- 
gole dell’aritmetica binaria 


+7 


0 

0 

0 

0 

Q 

1 

1 

1 

”5 


1 

1 

1 

1 

1 

0 

1 

1 

+ 2 

m 

0 

0 

0 

0 

0 

0 

1 

0 

-7 


1 

1 

1 

I 

1 

0 

0 

1 

-5 


1 

1 

1 

1 

1 

0 

I 

1 

-12 

HI 

1 

1 

1 

1 

0 

1 

0 

0 


trascurando il riporto. 

La maschera contenuta nell’accumula 
tore viene quindi sommata “logicamen 
te’ al contenuto attuale del registro 
53264 ($D010) ed 11 risultalo dellope- 
razione viene retmmagazzinato nel regi- 
stro 53264 tramite le istruzioni ORA 
SOCIO e STA SD010, che utilizzano 
entrambe il formato di indirizzamento 
assoluto (a due byte) 

Il programma, di cui è possìbile vedere 
un semplice schema a blocchi in figura 


Figura 4 — 

Funzionamento 

' sulla carta** 

del programma 

LABEL ISTRUZIONE 

ACCUMUL R£G. X 



COMMENTI 




76543210 

765^210 

c 

z 



CLC 



”1trrp 

0 

7 

Azzera li Cairy 


LDA 

SFB 

ocioooD n 


0 

0 

251 -+ ACCUM 


ROL 


000001 in 

77777777 

0 

0 

Rotai. a Sm 


TAX 


oonooiiO 

OGO0O11O 

0 

0 

ACCUM -► X 


LDA 

AS00 

00000000 

ooooono 

0 

1 

acojm *0 


STA 

SDOOO.X 

00000000 

ooooo no 

0 

1 

ACCUM 53248+ X 


TX A 


OQOOOUO 

nixxioi io 

0 

0 

X ^ ACCUM 


ROR 


OQO0OO1 1 

00000110 

0 

0 

Rotai a des. 


TAX 


00000011 

00000011 

0 

0 

ACCUM — X 


INX 


00000011 

OOOOO 100 

0 

0 

x+l -V X 


LDA 

# SOI 

OOOOOOOI 

00000100 

0 

0 

ACCUM ^#1 


ROR 


oooooooo 

OOOOO 100 

1 

1 

Rotai, a des. 

CICLO 

ROL 


OOOOOOOI 

OOOOO 100 

0 

0 

Rotai, a sin. 


DEX 


OOOOOOOI 

00000011 

0 

0 

X-l X 


BNE 

CICLO 

OOOOOOOI 

oooooon 

0 

0 

Se Z< >1 -s- CICLO 

CICLO 

ROL 


O0O000L0 

0OO0UO1 1 

0 

0 

Rotai, a sin 


DEX 


OOOQOOLO 

OOOOOOLO 

0 

0 

X-l -* X 


BNE 

OKXO 

OOOOOOLO 

QOOQOOIO 

0 

0 

Se Z< >1 -> CICLO 

CICLO 

ROL 


00000100 

OOOOOOLO 

0 

0 

Rotai, a sin. 


DEX 


00000100 

OOOOOOOI 

0 

0 

X-l —X 


BNE 

CICLO 

00000100 

OOOOOOOI 

0 

0 

Se Z < > 1 = > GCLG 

CICLO 

ROL 


000(11000 

OOOOOOOI 

0 

0 

Rotai, a sin. 


DEX 


00001000 

oooooooo 

0 

1 

X-l -^X 


BNE 

CICLO 

00001 ooo 

oooooooo 

0 

1 

Se 2 < > 1 = > CICLO 


ORA 

$D010 


oooooooo 

0 

0 

[(ACCUM) OR {53264}] “* 

ACCUM 


STA 

$DC10 

????!??? 

oooooooo 

0 

0 

ACCUM 53264 


RTS 


????!??? 

oooooooo 

0 

0 

Fine 
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1, viene quindi chiuso dall'istruzione di 
ritorno da sottoprogramma (RTS, Re- 
Turn. from Subroutine) 

Il suo Funzionamento, per guanto diffici- 
le da seguire in una descrizione per 
iscritto, può sembrare apparentemente 
semplice i vi assicuriamo, però, che la 
sua messa a punto è ata ben più labo- 
riosa. 

Per abbreviare i tempi di lavoro, e non 
andare incontro ad mutili insuccessi, è 
spesso conveniente verificare il funzio- 
namento di un programma * sulla carta” 
prima della sua effettiva esecuzione. coF 
duplice Scopo di verificare che il suo 
funzionamento sia corretto e che i risul- 
tati ottenuti coincidano con quelli voluti. 
A questo scopo è necessario disporre 
di un foglio dì carta quadrettata su cui 
riporteremo, di volta in volta, le configli 
razioni delle varie locazioni interessate 
dal programma, Non è indispensabile 
verificare II funzionamento del pro- 
gramma per ogni possibile serie di valo- 
ri dei parametri In ingresso, anche se è 
consigliabile analizzare attentamente 
determinati casi limite O valori dei para- 
metri dì ingresso particolari (come r In- 
dice 0 per 11 nostro programma). Un 
esempio de! funzionamento '"sulla car- 
ia " del nostro programma (nel caso in 
cuiil valore dell’indice dello sprite che 
si desidera controllare, inserito da BA- 
SIC in 251, sia uguale a 3) è riportato 
in figura 4 dove il simbolo indica 
un trasferimento tra locazione di memo- 
ria; #n" il caricamento immediato 
del valore n nel registro a sinistra della 
freccia; “= > * l’azione da intraprendere 
al verificarsi della condizione posta alfa 
sinistra del simbolo e “?* che il contenu- 
to del bit corrispondente è ignoto o irri* 
levante ai fini della nostra trattazione. 

Come inserire il programma 
in memoria 

È possibile inserire il programma in me- 



moria, come abbiamo già visto nell arti- 
colo precedente, utilizzando le funzioni 
messe a nostra disposizione da * Super 
monitor". 

Una volta caricato il nostro programma 
assemblatore, ed aver dato un comari 
do NEW per risistemare 1 puntatori al 
| K inizio della memoria riservata al BA- 
SIC. è necessario utilizzare l’istruzione 
SYS8192 per mandare in esecuzione la 
versione rilocata di “Super monitor" 
(SYS49152, se intendete servirvi della 
versione originale, ma. in questo caso, 
dovrete cambiare gli indirizzi a cui inse- 
rire il codice ASSEMBLY che compone 
il sottoprogramma). 

Per inserire il codice in linguaggio mac 
china direttamente in memoria sarà suf 
finente battere, di seguito al "prompt" 
il comando di ASSEMBLER (“A") 
seguito drfir indirizzo della locazione de 
stinata ad ospitare la prima istruzione 
in codice mnemonico della nostra routi- 
ne ed il codice mnemonico stesso 

A C400 CLC 

Una volta premuto RETURN, il calcola- 
tore premetterà al codice mnemonico 
fa sua conversione in esadedmale 

A C400 18 CLC 

quindi farà comparire 11 comando di AS- 
SEMBLER seguito dalla locazione im- 
mediatamente successiva all'ultima oc- 
cupata; nel nostro caso, essendo la pri- 
ma istruzione contenuta in un solo byte 

A C401 

è quindi possibile proseguire nel Ein tra- 
duzione dell'Intero testo del program- 
ma, che compare in figura 3. Una volta 
terminato e dopo essere usciti dal for- 
mato ASSEMBLER, premendo RE 
TURN dopo l'indirizzo della locazione 
seguente all’ultima istruzione del pro- 
gramma (RTS). è possibile registrare il 
programma su disco, tramite il coman 
do 

S C400 C41C L LM1 /SPRITE* 08 

o su nastro, tralasciando di aggiungere 
08 dopo il nome del file. 

Coloro che non desiderassero servirsi 
delta versione ribcata dei programma 
devono sostituire alla C iniziale degli in- 
dirizzi qualsiasi cifra superiore a 1 o 3e 
lettere A o B. In questo modo non si 
interferirà né con la versione originale 
del programma né con la memoria di 
schermo. 

Come aggiungere il 
softoprogr anima ai propri 
programmi BASIC 

E ovviamente possibile disporre delta 
routine realizzata, caricandola diretta 
mente da disco con il comando 

LOAD -LMÌ/SPRÌTE". 8, 1 


o da nastro con 
LOAD "LM1/5PR1TET 1. 1 
e facendo seguire al comando 
NEW [RETURN] 

per re se tiare i puntatori, onde poter ca- 
ricare quindi il programma destinato ad 
utilizzare ri sottoprogramma in questio- 
ne. 

Esiste però un metodo più semplice, 
che consente di incorporare la routine 
direttamente nei listati dei programmi 
che la utilizzano, anche se questo vi co 
sfera qualcosa in termini di occupazione 
di memoria per il listato BASIC e di 
tempo per l’effettivo inserimento del 
sottoprogramma In memoria. 

Il sistema consiste nel convertire le cifre 
esadecimali, che iJ calcolatore inserisce 
tra Tindirizzo delta locazione che le con- 
tiene ed il codice mnemonico delle istru- 
zioni da noi utilizzate, in cifre decimali, 
servendosi della funzione di conversio- 
ne esadedmale. Ricordate che la funzio- 
ne "tratta" numeri esadecimali compo- 
sti da quattro cifre, quindi per converti 
re $AA bisognerà utilizzare il coman- 
do 

$00 A A 

La serie di cifre così ottenuta va quindi 
inserita in frasi DATA all'interno del 
programma che deve utilizzare il sotto- 
programma (se il programma contiene 
già frasi DATA, fate attenzione che il 
posizionamento relativo delle due serie 
di dati corrisponda all’ordine in cui ven- 
gono effettivamente letti). Questi dati 
andranno letti ed inseriti ordinatamente 
in memoria a partire dalla locazione 
prescelta (dato che il programma è rifo 
cabile, è in realtà possibile spostarlo in 
qualsiasi zona di memoria disponibile). 
Questa serie di operazioni può essere 
svolta dalle righe BASIC seguenti 

10 FORI - 50176 TO 50203 ; READ A 
: POKEI. A NEXT 
20 DATA24. 165. 251, 42. 170, 169. 
0, 157,0.208, 138, 106, 170,232, 
169, 1, 106, 42, 202. 208 
30 DATA252, 13, 16, 208, 141 16, 
208, 96 

Per utilizzare il programma è inoltre ne 
cessarlo inserire in 251 il valore numeri 
co corrispondente all'indice dello sprite 
che si desidera controllare e quindi co 
mandarne l'esecuzione con una istruzio 
ne SYS all indirizzo a partire dal quale 
si è inserito il codice ASSEMBLY del 
programma Se SP è l'Indice in questio- 
ne (con 0<=SP<=7) 

—P0KÉ251. SP : SYSS01 76 

Come modificare il 
programma originale 

L'ultima parte delJ’articoIo si occuperà 
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delle modifiche che è necessario appor- 
tare al programma per utilizzarlo nel 
caso di attraversamento in senso oppo 
sto della frontiera posta in 255, 
Analizziamo rapidamente gli obiettivi 
che e necessario implementare; con- 
temporaneamente ne forniremo anche 
la traduzione BASIC. 

La prima operazione svolta dal sotto- 
programma originale consisteva nell'az- 
zeramento dell’ascissa dello sprite con- 
siderato L'operazione simmetrica, che 
è necessario compiere nella nuova ver- 
sione. consiste nel porre l'ascissa stessa 
pari a 255. Non vi sono t come è eviden- 
te. differenze di rilievo rispetto al pro- 
gramma originale In BASIC è sufficien- 
te sostituire 255 allo 0 dell'istruzione 
precedente, quindi 

POKE 53248+2*SP.255 

dove SP rappresenta sempre l'indice 
dello sprite desiderato. 

Analogamente, in linguaggio ASSEM- 
BLY, è sufficiente sostituire nell'istru- 
zione 

LDA #$00 

il valore caricato in indirizzamento im- 
mediato con # $FF. corrispondente alla 
codifica esadecimale del decimale 255. 
L'istruzione risulterà quindi 

LDA #$FF 

La seconda parte del programma pre- 
senta invece alcune rilevanti differenze 
rispetto allo schema del precedente e, 
in particolare, richiede una istruzione in 
più Vediamo, in dettaglio, qual è lo sco- 
po che ci si prefigge 
Dopo aver eguagliato a 255 il contenti 
to dell’ascissa dello sprite SP è necessa- 
rio disattivare il bit corrispondente dei 
registro 53264. In BASIC l'obiettivo 
può essere raggiunto tramite Fistruzio- 
ne 

POKE53264, PEEK(53264) AND 

(255-2 SP) 

dove la parte PEEK(53264) consente dì 
dispone del contenuto attuale del regi- 
stro e la maschera necessaria per l'ope- 
ra tote logico AND (in modo che i bit 
non interessati rimangano invariati) vie 
ne semplicemente ol tenuta completar 
do quella necessaria per settare lo stes- 
so bit tramite una operazione di somma 
logica 

Ovviamente sarebbe possibile applica- 
re lo stesso principio al nostro program- 
ma ASSEMBLY Per simmetrìa abbia- 
mo però preferito mantenere gli stessi 
meccanismi del programma originale, 
utilizzando le istruzioni dì rotazione. Il 
problema, che rende necessario aggiun- 
gere una istruzione, è provocato pro- 
prio dalle istruzioni di jota zinne. Come 
abbiamo visto nei paragrafi precedenti, 
infatti, le istruzioni di rotazione e di scor- 
rimento coinvolgono, oltre agli otto bit 


dell'accumulatore o della locazione in- 
teressata. anche il bit di riporto Nel 
caso della istruzione dì scorrimento 
ASL il bit meno significativo viene arbi- 


trariamente rimpiazzato da uno zero. 
Oò ci impedirà di usarla per la costiti 
zìone delta nostra maschera (da ut i izza 
re per l'operatore di prodotto logico 


Figura 

5 - Listato del secondo programma ASSEMBLY 

$C600 

CLC 


;azzera il riporto 

ìcóoi 

LDA 

SFB 

.carica l'indice contenuto nella locazione 251 

$C603 

RGL 


jotaz. a sinistra 

SC604 

$C605 

TAX 


trasferisce il contenuto del l'accumulatore nel 
registro X 

LDA 

# SFF 

; carie a in accumulatore la costante 255 

$C607 

STA 

SD000.X 

registra il contenuto dell’accumulatore nella lo- 

$C6QA 



cazione di indirizzo pari a 53248 +X 
(SDOOO+X) 

TXA 


trasferisce il contenuto del registro X in accu 
mulatore 


SCtìOB 

ROR 


irotaz. a destra 

$C60C 

TAX 



$C60D 

INX 


;ìl contenuto del registro X viene incrementato 
di uno 

SC60E 

$C610 

LDA 

#$FE 

;earica in accumulatore la costante 254 (confi- 
gurazione binaria 1111111 0) 

SEC 


;pone il riporto uguale a uno 

SC611 

ROR 


SC612 

ROL 



SC61.1 

DEX 


.il contenuto del registro X viene dee re mentalo 
di uno 

SC614 

BNE 

SC612 

;se il bit Z del registro di flag è diverso da 1. sì 
ricicla alla locazione $C612 

SC616 

AND 

$D0!0 

.operazione dì prrxlotto logico sui contenuti del- 
l'accumulatore e della locazione 53264 
($D010) 

$C619 

STA 

$D010 

;j| risultalo dell'operazione precedente viene 
reinserito nella locazione 53264 

ÌCóIC 

RTS 


;si rientra in ambiente BASIC 



suptrcomm odore# 5 /sì 2 1 



Figura 6 - E**mpio di funi iottm mento "sulla carta" 
dalla seconda ronfine 


LABEL ISTRUZIONE ACCUMUL REG X COMMENTI 





76S43210 

76543Z10 

c 

z 



CLC 

i 

m????? 

77777777 

0 

7 

Aiterà il riporlo 


LDA 

*251 

00000010 

?7?791?7 

0 

O 

253 — *ACCUM 


ROL 


OOOOOIOO 

77777777 

0 

0 

Rolaz a san 


TAX 


OOO0010O 

OOO0O10O 

0 

0 

ACCUM 


LDA 

*S2SS 

IllllUl 

OO0OQÌ0O 

0 

0 

ACCUM ^*2S5 


STA 

ID00CX 

munì 

000001 OC 

0 

0 

ACCLFM -► 53 24B+X 


TXA 


oocjoo im 

O0OOO10O 

0 

0 

X -+ ACCUM 


ROR 


OOÓ00O10 

000001 oc 

0 

0 

R oiaa a d« 


TAX 


1)0000010 

O000OO10 

0 

O 

ACCUM 


INX 


0OOOOO10 

OOOOO0H 

0 

0 

X+l X 


LDA 

0254 

mima 

oaoooon 

0 

0 

ACCUM 4- 0254 


SEC 


mima 

00000011 

1 

0 

U riporto tiene posto uguale * 


ROR 


militi 

00000011 

0 

0 

Rota; a dtfs 

CICLO 

RQL 


tiimio 

00000011 

1 

0 

Rotai, a san. 


DEX 


mimo 

00000010 

1 

0 

XI x 


BNE 

CICLO 

ninno 

00000010 

1 

0 

Se I< >l=> CICLO 

CICLO 

ROL 


UUllDl 

uGoooo m 

1 

0 

Rotai a sàn. 


DEX 


limici 

00000001 

1 

O 

x-l — X 


BNE 

CICLO 

minai 

00000001 

1 

0 

SeZ< >1=> CICLO 

CICLO 

ROL 


limoli 

00000001 

1 

0 

Rotai, a sin. 


DEX 


limoli 

0OOOOG00 

1 

1 

X-l -yX 


BNE 

CICLO 

limoli 

O0OO0OOO 

1 

i 

Se Z< >1 «> CICLO 


AND 

SD01O 


00000000 

1 

7 

[(ACCUM) AND (&3264)| -* 
ACCUM 


STA 

SDOU) 

777?7Q77 

OOÓOOOO0 

1 

7 

ACCUM 53264 


RTS 


mimi 

00000000 

1 

? 

Fine 


AND), dal momento che essa deve esse 
re composta interamente da bit settati 
a uno, tranne che in corrispondenza del- 
la posizione legata alio sprile controlla- 
to. 

Anche per quanto riguarda le istruzioni 
di rotazione non possiamo essere sicuri 
del contenuto del riporto (che viene In- 
serito nel bit più o meno significativo}; 


dovremo quindi assicurarci che esso sla 
settato prima dell'Inizio del ciclo che 
consente dì predisporre la maschera 
(benché il ciclo che ne controlla la co- 
struzione preveda anche una operazio- 
ne di decremento del registro X. che 
non genera mai riporti, l'uno che 41 esce" 
dall'accumulatore, e viene forzato nel 
Carry. non viene annullato, dal momen- 


to che l'istruzione DEX non influisce sul 
riporto), 

Per ovviare a questo inconveniente è 
quindi sufficiente premettere alla se con 
da istruzione ROR una istruzione di ini- 
zializzazione del riporto a uno: SEC, 
cioè SEt Carry. 11 listato completo del 
nuovo programma, rilocato a partire da 
$C6Q0 ( # 50688), compare in figura 5. 
Come è possibile notare dalla seconda 
istruzione, viene utilizzata per l'interfac- 
ciamento con II programma BASIC la 
stessa locazione (251) utilizzata dalla 
routine precedente. Dato che i due sol 
toprogrammi sono mutuamente esclusi- 
vi (se uno dei due è in funzione, non e'e 
bisogno dell' altro), non è necessario 
sprecare un'altra locazione inutilmente. 
Il nuovo sottoprogramma sarà richia- 
mato in maniera non differente dal pre- 
cedente; 

— POKE251, SP:SYS50688 

Per quanto riguarda 11 suo Inserimento 
internamente ad un programma BASIC 
è necessario modificare, oltre ai valori 
numerici da inserire in frasi DATA - 
che lasciamo calcolare ai lettori tramite 
l'opzione “M" di “Supermonitor" -, i 
limiti del ciclo di lettura ed inserimento 
del dall, che vanno inseriti alle locazioni 
da 50688 a 50717, 

In figura 6, infine, vediamo un esempio 
di funzionamento “"sulla carta’" delia no- 
stra nuova routine, con un valore del- 
l'indice contenuto nella locazione 251 
uguale a 2. Sono state utilizzate le sfes 
se notazioni di figura 4 
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OK-List 
per la perfetta 
battitura 
dei listati 


'SS** 

«», 


I nserite in memoria l’OK LJST prima 
di accingervi a battere i listati pubbli' 
cati; avrete a disposizione un formidabi- 
le mezzo per essere sicuri di aver inseri- 
to nel computer ogni carattere In modo 
assolutamente corretto. 

Tutti i nostri listati sono caratterizzati 
da un numero aggiunto ad ogni linea di 
programma, ad esempio: rem 123. 
NON COPIATE QUESTA PARTE 
DELLA LINEA! Serve unicamente per 
vostra informazione, L'istruzione REM 
ha Punico scopo di renderla inoffensiva, 
se per errore doveste batterla. 

Se T prima di iniziare il lavoro di battitura 
del listato, caricate in memoria OK' 
LIST e lo attivate con RUN, per ogni 
linea che battete verrà visualizzato un 
numero (detto checksum} nell’angolo 
superiore sinistro dello schermo. 
Confrontate questo numero con quello 
pubblicato per ogni linea del listato: se 
non corrisponde, ciò significa che avete 
commesso un errore nella battitura del- 
la lìnea stessa. 

Le ore buttate per cercare e correggere 
errori dì battitura in programmi che non 
funzionano saranno solo un lontano ri- 
cordo! 

Due ultime cose di cui tenere conto: 
OK-LIST non tiene conto degli spazi: 
questo per vostra convenienza, poiché 
questi generalmente sono poco impor- 
tanti. 

Infine, OK-LIST è allocato nel buffer dei 
registratore (locazioni 886-1018), quin- 
di, prima di salvare su cassetta il pro- 
gramma che state battendo, ricordatevi 
di disabitarlo premendo contempora- 
neamente RUN/STOP + RESTORE. 
Potrete poi riattivarlo con SYS 886. 

Il sistema più comodo per usare OK- 
LIST è quello di battere normalmente 
Il programma, quindi listarlo e portarsi 
con il cursore sul numero di lìnea piu 
basso che appare sul video; premere 
quindi RETURN e confrontare il nume- 
ro di check-sum visualizzato nell’angolo 
superiore sinistro del video con quello 
pubblicato per la data riga del program- 
ma, Il cursore si porterà automatica- 
mente sulla lìnea successiva e non do- 
vrete fare altro che premere 11 che- 
cksitm seguente. 

Data l'area di memoria in cui si trova, 
OK-LIST non può essere usato per con- 
trollare un programma già salvato su 
cassetta, mentre ciò è possibile se il pro- 
gramma è stato registrato su disco. 


printMclr] attendere prego-, 

FORI - 8 8 6TG1 0 1 8 : RE ADA : C K - CK+A ; POKE I f A: 
NEXT 

IF CK017539 THEN PRI NT’ 1 { GIU 1 ) ERRORE 
NELLE ISTRUZIONI DATA” : END 
SYS886:PRINT N {CLRH 2 GlU’}OK-LIST AT 
TIVATO," :NEW 

DATA 173,036*003, 201, 150, 208 
DATA 001,096,141,151,003,173 
DATA 037,003,141,152,003,169 
DATA 150,141,036,003,169,003 
DATA 141,037,003,169,000,133 
DATA 254,096,032,087,241,133 
DATA 251,134,252,132,253,008 
DATA 201,013,240,017,201,032 
DATA 240,005,024,101,254,133 
DATA 254,165,251,166,252,164 
DATA 253,040,096,169,013,032 
DATA 210,255,165,214,141,251 
DATA 003,206,251,003,169,000 
DATA 133,216,169,019,032,210 


SUPCTCOMWDOKE® s/as 23 


MLX per VIC 20 
e C64 


di C. Brannoiì 

trad. e adatt. 

di M, CHstnib Griszi 

(versione 2.0 per C 64 ) e f. stella 


M LX è un programma che permette 
dì inserire listati In linguaggio mac- 
china esenti in modo assoluto da errori è 
senza [a perdita dì tempo del dover batte- 
re e controllare lunghe sequenze di istru- 
zioni DATA, 

Molti dei nostri listati di programmi in 
linguaggio macchina hanno il formato 
MLX (lì riconoscete dal fatto che sono 
estivamente numerici) e richiedono 
quindi che MLX sia caricato in memoria 
ed eseguito prima della battitura del lista- 
to. 

MLX vi chiederà l’indirizzo della locazio- 
ne di partenza e quello della locazione 
finale del programma da caricare. Questi 
valori sono sempre Indicati nel Particola 
che accompagna 11 listato, MLX vi segna- 
la automaticamente gli errori di battitura 
MENTRE STATE DIGITANDO IL LI- 
STATO e vi chiede di relnserire la linea 
errata. L'ultimo numero battuto di ogni 

MLX versione per VIC 20 


linea rappresenta il checksum e viene vi- 
sualizzato in re verse. 

Sono inoltre disponibili altri comandi, quali: 
SH1FT-N nuovo indirizzo: permette di 
cambiare l'indirizzo della linea che volete 
battere ed è utile nel caso sì inseriscano 
ì listati in più parti, 

SHIFT-D display: lista i dati inseriti tra 
due indirizzi di Inizio e fine. 

SHIFT-L load: carica un file da nastro o 
SHIFT-S save: salva su nastro o disco un 
file in formato MLX. 

Una volta battuto il listato, e salvatolo 
tramite MLX, si potrà caricare diretta- 
mente il programma con un'istruzione 
LOAD “nome del file”, 1,1 per il registra 
tore, oppure LOAD "nome del fileTS,! 
per l'unità a d ischi , salvo diverse Indica- 
zioni date negli articoli corrispondenti al 
vari programmi, li programma sarà gene- 
ralmente mandato in esecuzione con una 
SYS (indirizzo di partenza). 


La versione originarla di MLX per C64 
ha subìto t dalla prima pubblicazione, di- 
versi ritocchi e miglioramenti, fino a E la 
versione 2.0 qui presentata. 

È stato in primo luogo modificato il colore 
di fondo dello schermo e del bordo, in 
modo da risultare meno stancante alla 
vista: sono state ulteriormente perfezio- 
nate le routine in linguaggio macchina di 
salvataggio e caricamento dei program- 
mi; è cambiata la forma del cursore e T 
cosa più importante, è stato aggiunto un 
tasti erino numerico per gii utenti che si 
trovano più a loro agio con una dìversa 
disposizione del tasti. 

Oltre a poter usare ì soliti tasti numerici, 
sono stati rldefìnltl alcuni fasti alfabetici, 
in modo da generare ugualmente dei nu- 
meri. I tasti ridefiniti sono i seguenti: 

U I O 7 89 

H J K L diventano 0 4 5 6 

M , . 12 3 

Le persone abituate ad usare tali tastieri- 
ni accresceranno senz’altro, in brevissimo 
tempo, la velocità di battitura del pro- 
grammi In linguaggio macchina. 


100 FRI NT 11 {CLR} { PUR} 11 ;CHR$ (142) ;CHR$(8) ; 

:rem 181 

101 PQKE78S,! 94 ; REM DISABILITA RUN/STOP 

:rem 144 

1 1 0 PRI NT" {RVS: } { 14 SPAZI } 11 : rem 117 

Ì2G PRINT" [RVS } (OES }{GFF} [ <*>]£. [RVS] 

{DES} {D£S}( 2 SPAZI) [<*>1 {OFF} (<*>] 
_£■( RVS 1 £{ RVS j 11 :rem 191 

130 PRINT"TRVS} {DES} [<G>]{DES} 

{ 2 DES} {OFF) £{RVS}£[<*>] (OFF) [<*>] 

{ RVS } {OFF}" : rem 122 

140 PRINT" (RVS M 14 SPAZI) 11 :rem 120 

200 PRI NT" ( 2 GIU 1 HPURHbLKJoN PROGRAMMA 
PER L 1 XN-TRQDU ZIQNE { 2 SPAZI} DI ROUT 
INE IN LINGUAGGIO MACCHINA" ; :rem 202 

205 PRINT"A PROVA DI ERRORE { 5 GIU'}" 

srem 226 

210 PRI NT" { BLK } { 4 SU) INDIRIZZO DI PARTEN 
ZA" : I NPUTS : F= 1 - F : C$=CHR$ (31+1 1 9*F) 

: rem 5 2 

220 I FS< 2 5GOR5> 32 76 7THENGOSUB30 00 : GOTO 21 0 

: rem 2 

225 PRINT: PRINT: PRINT: PRINT :rem 123 

230 PRI NT" {BLK} { 3 SU) INDIRIZZO CONCLUSI V 
O" :INPU TE :F-1-F:C$=CHR $(31+11 9*F) 

: rem 170 

2 40 I FE< 2 5 60RE > 3 276 7Tf È ENGQSU B 3 0 0 0 : GOTO 230 

rrera 234 

2 50 I FE< STHENPRI NTC$ ; " ( RVS } I NDI RI ZZO CONC 
LUSIVO < INDIR! ZZO DI PARTENZA 
{ 3 GIU 1 } 11 : GOSUBl 00 0 : GOTQ2 30 : rem 27 
260 PRINT- PRINT: PRINT :rem 179 

300 PRINT" {CLR}" ?CHR$ (1 4) :AD=S :rem 56 
31 0 PRI NTR IGHT$ ( " 000 0" +MID$ ( STR$ (AD ) ,2} ,5 
FORJ-1TQ6 ; rem 234 

320 GOSUE570: I FN=- 1 THENJ=J+N ; GOTQ32G 

:rem 228 

390 IFN=-21 1THEN77 0 : rem 62 

400 I FN=- 20 4THEN790 : rem 64 

410 IFN=-206THENPRINT: PRINT" {GIU* } INSERÌ S 
CT UN NUOVO} 4 SPAZI } I_ND IRI ZZO" ; : INPU 
TZZ : rem 4 2 


41 5 IFN-- 20 6THENIF ZZ< SORZ Z>ETHENPRINT" 
{RVS} ESC E DAL CAMPO DI VA-" : rem 150 

416 IFN=-206THENIFZZ<SORZZ>ETHENPRINT" 
{RVS} LORI I NDICATO": GOSUBl 000; GOT041 0 

;rem 105 

417 I FN=- 20 GTHENAD^Z Z ; PRINT:GGTG31 0 

: rem 2 38 

420 IFNO-1 96THEN430 : rem 133 

4 30 PRINT : INPUT" LISTATO ; DA" ; F : PRINT, " 

( 2 SIN} A" ; t INPUTT : rem 29 

440 I FF< SOR F >EORT< SORT>ETM£N PR I NT" M I N I MO " 
; S ; " f S I ti } t MASSI MO " ; E : GOTO 4 30 

: rem 36 

4 50 FORI = FTOTSTE P 6 : PRI NT : PR I NTR I GHT$ ("000 



0" +HIDS (STR$ (I) ,2) ,5) ; ; 

: rem 

30 

455 

FORK=OTOS:N=PEEK (T + K) : I FK- 

3THENPRINTS 


PCpO] ; 

: rem 

34 

457 

PRINTRIGHT$ ("00” +MID? (STR$(N) ,2 ) , 

3) S" 


« * 
r $ 

: rem 

157 

460 

GETA$S IFA8>""THENPRINT: PRI NT; GOTO 31 0 



:rem 

25 

4 70 

NEXTK : PRI NTC HR$ ( 2 0 ) ; : NEX TI 

: PRINT: 

PRIN 


T : G0TO3 1 0 

: rem 

50 

480 

I FN< 0 THBNPRI NT ; GOTO 3 1 0 

: rem 

1 68 

490 

A ( J) S N : NEXTJ 

: rem 

1 99 

500 

CKSUM=AD-INT (AD/256) *256: FORI = 1 TO 6 : C K 


SUM= (CKSUM+A ( I ) ) AND255: NEXT : rem 

200 

51 0 

PRINTCHRS (1 8J ; :GOSUB570: PRINTCHR$ (20) 



: rem 

234 

51 5 

IFN=CKSUMTHEN530 

: rem 

255 

520 

PRINT; PRINT" LA RIGA E 1 STATA XNSE 

-RIT 


A IN MANIERA ERRATA" 

: rem 

39 

525 

PRINT"RI- INSERIRLA" : PRINT; 

GOSUBl G 00 : G 


OT031 0 

: rem 

167 

530 

GOSUB2000 

: rem 

218 

540 

FORI = 1 TO 6 : P0KE AD+I - 1 , A(I) : 

NEXT 




: rem 

80 

550 

AD =AD + 6 : 1 F AD < ETHEN 310 

:rem 

212 

560 

G0TO71 0 

:rem 

108 

570 

N=0;Z=0 

: rem 

88 


24 SUPFHCOMMOt>OnE®&,-SS 


580 

PRINT" [<+>} 11 ; 

: rem 

79 

581 

GETAS:IFA$ = " "THEN581 

: rem 

95 

585 

PRTNTCHRS (20) ; :A=ASC(A$) ;IFR 

.= 1 30RA-44 


ORA- 32THEN 670 

: rem 

229 

590 

I FA > 1 2 BTHEN N = - A : HETURN 

:rem 

137 

600 

TFA0 2 0THEN630 

:rem 

10 

610 

GOSUB690 : IFI - 1 ANDT=44THENN^- 

1 : PRINT" 


{SIN} {SIN}"; : GOTO 690 

: rem 

172 

620 

GOTO 570 

:rem 

109 

630 

IFA<48QRA>57THEMS80 

:rem 

105 

640 

PRINTA? j : N“N # 1 0 +A-48 

; rem 

106 

650 

I FN > 2 5 5TN ENA- 2 0 :GOSUBl 000 ; GOTO 600 




: rem 

229 

660 

Z- Z+T : IFZ< 3THEN580 

: rem 

71 

670 

IFZ=OTHENGOSUBlOOO:GOTOS70 

: rem 

1 14 

680 

PRINT " , " - z RETURN 

:rem 

240 

690 

S%=PÉEK( 209)+256*PEEK{21 0) +PEEK{21 1 ) 



:rem 

149 

692 

FORI = 1 T03 : T=PEEK ( S%- 1 ) 

: rem 

68 


695 T FT< > 4 4 ANDT< > 5 BTHENPQKES X ,32; NEXT 

:rem 205 

700 PRINTLEFT5 { " { 3 SIN}" ,1-1) ; : RETURN 

siera 7 

710 PRIMT" {CLHHRVS}*** SAVE *** 

{ 3 GIU 1 } 11 :rem 236 

720 I NPPT" {GIU 1 } NOME DEL FILE";F$ 

;reirt 195 

7 30 PRINT: PRINT" { 2 GIU 1 }{RVS }N [OFF J ASTRO 
O (RVS }D {OFF } ISCO: (N/D) " : rem 128 

74 0 GETAS:IFA$<> M N n ANDA$O H D"THEN740 

:rem 30 

750 DV=1^7* EA0=”D ,, ì ; I FDV=8THENF$-" 0 ; 14 +F$ 

:rem 158 

760 T$ = F$ : ZK-PEEK { 53 ) +256*FEEK { 54 ) -LEN (T$ 
ì : POKE782 , ZK/256 : rem 3 

762 POKE781 , ZK-PEEK ( 782) *256: PGKE7BD ,LEN { 

T$) ; SYS654 69 :rem 109 

763 POKE78 0 , 1 :POKE781 , DVt P0KE782 , 1 ;SYS654 

66 :rem 69 

765 POKE254 , S/256 : POKE2 53 ,S- PEEK (254) *256 

: POKE780 f 253 : rem 12 

766 P0KE78 2 , E/ 2 56 : POKE78 1 t E- PEEK (782) * 256 

: SYS65496 :zem 124 

770 I F ( PEEK (783) AND 1 ) OR f ST AND 191) THEN 780 

; rem 1 1 ì 


775 PRINT" {GIU* }OPERAZIONE CONCLUSA . " ; END 

: rem 1 52 

780 PRINT" {GIU 1 } ERRORE DI REGI STRAZIO- NE. 
RIPROVA . " : I FDV= 1 THEN720 : rem B 


781 

O PEN 1 5 , 8 , 1 5 : INPUT# 1 5 , E 1 S 

,E2$ : PRINTEl 5 


; E2S JCLOSEl 5 :GOTO720 

:rem 

103 

782 

(JOTO720 

: rem 

1 15 

790 

PK 1 NT" {CLR } {RVS}*** LO AD 




{ 2 GIU 1 }" 

: rem 

212 

800 

INPUT" { 2 GIU’) NOME DEL 

FILE" ; F$ 




: rem 

.215 


810 PRINT: PRINT 11 { 2 GIU 1 } { RVS ] N {OFF ] ASTRO 
0 fRVS}D [OFFUSCO: (N/D) " :rem 127 
82 0 GETA8 : T FA$ < > 11 N" AND A $ < > " D 11 THEN 82 0 

: rem 28 

8 30 DV~ I - 7* [A$ = "D T| ) : I FD V= STHENF $ = " G : " +F$ 

:rem 1 57 

84 0 ZK=PEEK ( 53 ) +2 56* PEEK ( 54 } - LEN {T$ 

) tmKElBl, ZK/256 : rem 2 

841 POKE/81 , ZK- PEEK £782}*256: PQKE780 ,LEN ( 
T$):SYS65469 :rem 107 

84 5 POKE78D , 1 ;POKE781 , DV : POKE78 2 , 1 : SYS654 
66 :rem 70 

850 PQKE7B0, 0: SYS 654 9 3 : rem 11 

860 IF (PEEK (783) AND 1 ) OR (ST AND 191} THEN 870 

: rem 111 

865 PRINT" {GIU* {OPERAZIONE CONCLUSA . ,f ;GOT 
0310 :rem 142 

870 PRINT" {GIU* lERRORE DI C AR I C AMENTO « R I P 
ROVA . {GIU ' } " : IFDV- 1 THEN80Q :rem 43 

880 OPENl 5,8, ì 5: INPUT! 1 5,El $ ,E2S: PRINTEl $ 
; E2S : CLOSEl 5 : GOTO 800 ;rem 10 2 

1000 REM CICALINO :rem 231 

1001 POK E 3 6 8 7 8 , 1 5 ; PO KE 3 6 8 7 4 , ì 90 : rem 2 06 

1 002 FORW = 1 TO30G : NEXTVf : rem 117 

1 00 3 PO K E 3 6 8 7 3 , 0 : PO KE 3 68 74 , 0 : RETURN 

:rem 74 

2000 REM CAMPANELLO :rcm 130 

2001 FORW^l 5TO0STEP-1 : FQKE3687 8 , W: POKE368 

76,240: NEXTK : rem 2 2 

2002 POKE36 876,0: RETURN :rem 119 

3000 PRI NTC $ ; *' { RVS J NON IN PAGINA ZERO O 

{ 2 SPAZI] SU HOMI 4 GIU 1 ì " : GOTO 1 0 00 

:rem 23 


MLX versione 2.0 per C4>4 

100 PRINT" {CLR} (CYN] ";CHR$ Il 42) ;CHR$(B) ; : 

POKE53280 , 0 :PGKE5 328 1 ,0 : rem 71 

101 PGKE788, 52; REM DISABILITA RUN/STOP 

;rem 89 

110 PRINT" {RVS] { 4 0 SPAZI]"? :retn 176 
120 PRINT" { RVS }{ 15 SPAZI} (DES) {OFF) [<*>} 
“(rvsHdes] IDESH 2 SPAZI] [<*>] {OFF} 
[<*>]^{RVS}~{RVS} { 13 SPAZI]"; 

:rem 250 

T 3 0 PRINT” { RVS } { 15 SPAZI] {DES] fCN>] I<H>Ì 
[DES] j 2 DES} {OFF } ^ { RVS < * > ] {OFF} 
[<*>]{RVS}{ 13 SPAZlJ"; :rem 220 

140 PRINT" { RVS }( 40 SPAZI}" :rem 120 

200 PRINT" { 2 GIU* } {PUR} EDITOR DI CODICE 
MACCHINA VERSIONE 2.0{ 3 GIU*}" 

: rem 126 

210 PRlNT"t<5>]{ 2 SU] INDIRIZZO DI PARTE 
NZA{ 2 SPAZI}" ; IINPUTS:F-1-F:CS=CHR$ { 
31 +1 1 9*F) : rem 85 

220 IFS < 2 560R { S> 4 0 96 0 AND5 < 4 91 52)ORS>53247 
THENGOSUB 3000 : GOT021 0 : rem 235 

225 PRINT : PRINT : PRINT :rem 180 


230 PRINT" [ < 5 > 1 { 2 SU} INDIRIZZO CONCLUSI 
V0{ 3 SPAZ I } " ; : INPUTE *F-1 -F :C$-CHR$ ( 3 
1+T19*F> : rem 92 

240 IFEC256OR(E>40960ANDE<491 52)QRE>53247 
THENGOSUB3 000 : GOT02 30 ;rem 183 

2 50 IFE<STHENPRINTC$ ; " ( RVS } INDI RIZZO CONC 
LUS IVO< INDIR! Z ZO INIZIALE" :rem 200 

2 55 I FECSTHENGOS UB 1 0 0 0 : GOTO 230 :rem 119 

260 PRINT: PRI NT: FRI NT itera 179 

300 PRINT" {CLR} " ; CHR8 (14) : AD=S : PQKEV+2 1 ,0 

; r em 225 

31 0 A- 1 : PRINTRIGHT3 ("0000"+MIDS (STR5 {AD) , 
2) ,5} ;"ì"| ; FOKJ = AT06 : rem 227 

315 FORJ=AT06 -rem 33 

320 GOS UB 5 70 : 1 FN= - 1 THE NJ = J + N : GOTO 3 2 0 

: rem 228 

390 IFN--211THEN710 :rem 62 

400 IFN=-204THEn 790 : rem 64 

410 IFN= - 20 6THENFRINT; INPUT" { GIU T } I^NSERI ' 
RE IL NUOVO ^INDIRIZZO" ; ZZ :rem 13 

414 IFN-^206THENIFZZ<SORZZ>ETHENPRINT" 

{RVS} ESCE DAL CAMPO DI VALORI INDICAT 
O" : rem 105 


&UPrRDOMMOLX>RE ;B ' 5/W ■ 25 


41 5 I FN - -206 TUENI F22<S0RZ Z > ETHENGGSUB 1 000 
:GQT041G irtm 202 

41 7 IFN- - 2 0 6THENAD= Z Z ; PRTNT s G0TO3 ! 0 

srcm 238 

4 20 IFNO-Ì96THEN480 :re m 133 

430 FRI NT : I NP UT 11 LI S TATO : 0 A " ; P: PRlNT" 

{ 9 SPA Z I } A” ; ; INPUTT : rem 1 83 

4 40 I FF <SQRF > EORT < SORT >ETHENPRI NT "MI MIMO n 
ìS;" MASSIMO *;E; n l [< 5> ] " : G0TO4 30 

:rem 147 

4 50 FORI - FTQTS TEP 6 : PRI NT : PRI NTR I GHT$ ("000 
0"+MID$(STR$(I) ,2) ,5);";"; : rem 30 

451 FORK=0TO5:N=PEEK (I+K) : PRINTRIGHT$ ("00 
fl +MID$i(STR$ (N) , 2 j , 3) ; " , " ; : rem 66 

4 60 GETA$ : I FA$> " "THENPRINT : PRlNT :GOTQ37 0 

srem 25 

470 NEXTK : PRI NTCH R$ ( 20 ) ; : NEXTI : FRI NT : PRIN 
T : GQT03 1 0 : rem 50 

4 80 I FN< 0THENPRI NT : GOTG3 1 0 :rem 168 

4 90 A(J)=N:NEXTJ : rem 199 

500 C KSUM= AD - 1 NT ( AD/ 256) *256: FORI = 1 TOS sCK 
S OM.- ( C KS UM+A £ I ) } AND255 : NEXT srem 200 

51 0 FRI NTCHR$ (18) ; : GOSUB5 70 : PRINTCHR$ ( 1 4 6 

) 7 :rem 94 

511 IFN--1THENA-6 :GOT0315 : rem 254 

515 PRI NTCHR? (20) : IFN-CKSOMTHEN5 30 

srem 122 

520 PRI NT : FRI NT" { RED] LA LINEA E * STATA IN 
SER1TA IN MANIERA" : rem 157 

525 PRI NT "ERRATA » RIPETERE £< 5>] ": PRINTsGG 
SUBÌ 000 :GOTO310 :rem 27 


530 

GOSUB2000 

; rem 

218 

54 0 

FOR 1*1 TO 6 : FOKEAD+I - 1 ,AfI) s 

NEXT: POKE 5 4 


272 , 0: POKE54273 , 0 

srem 

227 

550 

AD* AD +6 : 1 FAD<ETHEN3 1 0 

srem 

212 

560 

GOTO? 10 

srem 

108 

570 

N-0 : Z=0 

; rem 

83 

580 

PRINT 11 [<">] 

s rem 

81 

581 

GETA5 : I FA$ ~ " "THEN 5 8 1 

: rem 

95 

582 

AV* - ( A$ = "M" ) - 2 * ( AS * 11 , 1T } ~ 3 * 

{ A$ - 11 . 11 

) - 4* 


£ A$ = " J " ) - 5 * ( A$ = " K" ) ^ 6 * { A$ » 

%") 




: rem 

41 

583 

AV = AV - 7 * ( AS ” "0" ) - 8 * (A$ = "I ,t 

) - 9 * ( A$ 

_«o« 


) s IFA$- n H n THENA$- w 0" 

s rem 

134 

584 

IFAV>0THENA$=CHR$ (48+AV) 

s rem 

134 

585 

PRINTCHR$(20) j sA^ASCfA?) :IFA=1 30RA^4 4 


ORA= 32THEN670 

: rem 

229 

590 

I F A > 1 28THENN= -A: RETURN 

: rem 

137 

600 

IFAO2QTHEN63 0 

: rem 

10 

61 0 

GOS UB 6 9 0 S I F I = 1 ANDT= 4 4 THENN 

=-l SPRINT" 


{SIN} {SIN}"; : G0TO6 90 

s rem 

172 

620 

GOTOS 70 

:rem 

1 09 

630 

IFA<48ORA>57tHEN5B0 

srem 

1 05 

640 

PRINTA$ ; :N-N*1 0+A-4 8 

: rem 

106 

650 

I FN > 2 5 5THENA= 2 0 : GOSUB 7 000: 

GOTO 600 




: rem 

229 

660 

Z*Z + 1 : 1 FZ < 3THEN5 8 0 

: rem 

71 

670 

IF2 -OTHENGOSUBI 000 : GOTO 5 70 

srem 

114 

680 

PRI NT", n ; i RETURN 

srem 

240 

690 

St*PEEK (209) +256*PEEK (21 0} +PBEK (21 1 ) 



: rem 

1 49 

691 

FORI 43 1 T03 ST=PEEK (SS - 1 ) 

s rem 

67 


695 IFT<>4 4ANDTO58THENP0KES 1,32: NEXT 

srem 205 

700 FRI NTLEFT6 £ 11 { 3 S I N } 11 , 1 - 1 ) ; : RETURN 

: r em 7 

710 PRlNT" {CLR} fRVS}*** SAVE *** 

i 3 GIU'}" : rem 236 

7 1 5 PRI NT 11 { 2 GIU 1 } PREMERE [ RVS } RETURN 
{OFF} PER USCIRE DAL S AVE { GIU'}" 

srem 103 


720 F$ " : INPUT" {GIU 1 ) NOME DEL FILE"; F$:I 
FF$s - "THENFRINT : PRI NT : GOT03 1 0 

srem 42 

730 PRI NT ì PRI NT" { 2 GIU 1 }{ RVS} N{ OFF} ASTRO 
O { RVS }0 {OFF} ISCO: (N/D) " : rem 128 

740 GETA$ S IFA$< > "N"ANDA$ < > W D "THEN74 Q 

: rem 30 

750 DV= 1-7* (AS = "D ,r ) : IFDV” 8THENFS - "Q ; "+F$ : 

OPENl 5, 8, 1 5, «S n +FS sCLGSEl 5 srem 21 2 
760 T$-F$ : ZK^FEEK ( 53) +256*PEEK (54) -LEK (T$ 
) :POKE782,ZK/256 : rem 3 

762 POKE781 , ZK-FEEK £ 782) *256: POKE 780, LEN ( 

T$ ] s SYS6 54 6 9 srem 109 

763 POKE780 , T : POKE781 ,DV: PQKE7S2 , 1 :SYS654 

66 srem 69 

76 5 K~S : POKE254 r K/256 : PQKE253 , K- PEEK (254) 

* 256 : POKE7 80 r 253 : rem 17 

766 K-E+1 S PORLE? 82 , K/256 : POKE7 81 ,K^PEEK(78 
2) *2 56 : SYS65496 : rem 235 

770 IP (PEEK (783) ANDl ) OR £ 1 9 1 ANDST) TNEN78G 

s rem 1 1 1 

775 PRI NT" (GIU * } FATTO. {GIU 1 }":GOTO310 

srem 201 

780 FRI NT n { G I U 1 } ERRORE NEL S AVE-RI PROVA i 11 

: IFDV= 1 THEN72 0 srem 704 

781 OPEN! 5,8,1 5s INPUT#! 5,B1 S,E2S : PRINTEl $ 

;E2$ : CLOSEl 5 : GOTO? 2 0 : r em 10 3 

790 PRI NT 11 { CLR} { RVS } *** LOAD *** 

{ 2 GIU 1 }" : rem 212 

795 PRlNT" { 2 GIU* } PREME RE {RVS} RETURN 
{OFF} PER USCIRE DAL LOADtGlIFT* 

: rem 96 

800 F$” " " s INPUT” { 2 GIU 1 } NOME DEL FILE" ; F 
$ s I FF$ = ""THENFRINT :GGT03 1 0 s rem 115 

8Ì0 PRI NT : PRTNT" { 2 GIU 1 J { RVS } N{ OFF } ASTRO 
O ( RVS } D f OFF ] ISCO S ( N/D) " : rem 7 27 

82 0 GETA$ : I FA$ < > " N " ANDA$ < > " D 11 TUE N8 2 0 

srem 26 

8 30 DV=1 «7* (A6~"D") : 3 FDV- 8THENF? - " 0 s "+F$ 

;rem 157 

840 T$-F$:ZK=PEEK£53) +2 56 *PEEK ( 54 ) ~LEN (T$ 

) sPOKE7fl2 J ZK/256 s rem 2 

841 ROKE781 , ZK-PEEK ( 78 2 ) *2 56 : POKE780 # LEN { 

T^) : SYS 6 54 6 9 srem 107 

845 POKE78Q, 1 :POKE787 ,DV:POKE782, T ISYS654 
66 : rem 70 

850 POKE7 80 , 0 ; S YS 6 5 4 93 s rem 11 

860 IF (PEEK (783) ANDl ) OR (1 91 ANDST) TBBN870 

s rem 1 ! 1 

865 PRINT " { G I U f } FATTO . " : GDT03 1 0 : rem 184 
870 PRINT" {GIU 1 } ERRORE NEL LOAD-RI PETI ! 

{GIU 1 } " : I FDV= 1 THEN 800 :rem 19 

880 OPENl 5, 8, 1 5;INPUT#1 5,E1 $,E2$:PRINTEÌ 6 
; E2 6 ; CLOSEl 5 s GOTOS 0 0 s rem 102 

1 000 REM CICALINO : rem 231 

1 001 POKE 54 296, 7 5 s POKE 54 277, 45 : POKE 54278, 

^65 ;rera 207 

1002 PQKE54276 , 33 : POKE54273 f 6 s POKE54 272 , 5 

s rem 42 

1 003 FORT* 1 T02 0 0 s NEXT : POKE 5 4276, 32: POKE 5 4 
273, 0 : POKE 54 272,0 : RETURN s rem 202 

2000 REM CAMPANELLO s rem 130 

2001 POKE 542 96, 7 5SPOKE54 2 77, 0 :POKE54 2 78 , 2 

47 srem 152 

2002 POKE 54 276,17: PO KE54273,40s POKE 54272, 

0 s rem 86 

200 3 FORT - 1 TO 1 0 0 : NEXT ; POKE 54276, 1 6: RETURN 

srem 57 

3000 PRINTC$ ; " { RVS } NON IN PAGINA ZERO O 
SU { UES } ROM "j GOTO! 000 : rem 24 0 
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DIS ASSEMBLER 

Disasse ntbla un blocco di memoria, vi- 
sualizzando i codici ASSEMBLY del 
6502 contenuti nelle locazioni di memo 
ria scelte. 

Formato: 

D<$xxxx(l)> < $xxxx(2)> 
SxxxxU) - indirizzo di partenza del 
blocco dati da disassemblare 
5xxxx(2) = indirizzo fine blocco dati. 


Il monitor 
del C16 

di À. Motta 


F ra i comandi del BASIC 3.5 in dota- 
zione at Commodore C16 vi è l'istru- 
zione “MONITOR", che consente di 
operare con F Assembler del micropro- 
cessore 7501 {il cervello del Ciò). che, 
di fatto, è lo stesso Assembler del capo- 
famiglia 6502. 

Quando però l’utente, che dopo essersi 
impadronito del linguaggio BASIC deci’ 
de di esplorare il mondo Assembler, sfo 
glia ruSER MANUAL” per cercare le 
istruzioni da utilizzare con il comando 
MONITOR resta abbastanza deluso nel 
leggere quelle brevi righe che rimanda 
no ad una fantomatica ^COMMODORE 
PLUS/4 PROGRAMMERÀ REFE 
RENCE GUIDE", che alla data di stesu 
ra di questo articolo (inizio febbraio *85) 
risulta del tutto sconosciuta sul merca- 
to. 

In queste pagine cercherò di illustrare 
come usare il MONITOR di cui dispone 
il CI 6, premettendo che, per una mag- 
gior comprensione dell'articolo, è ne- 
cessario avere almeno una conoscenza 
di base dell'Assembler del 6502. Per 
chi è completamente a digiuno della 
materia, ma desidera impadronirsene, 
segnalo che sono apparsi, su numeri 
precedenti della rivista, una serie di ar- 
ticoli di Alessandro Guida dal titolo "IM- 
PARIAMO IL LINGUAGGIO MAC 
CHINA CON IL VIC E 064” che tratta 
no tale argomento. 

Digitato il comando "MONITOR*, e 
penso la maggior parte dei possessori 
del C16 abbia già provato ad eseguirlo, 
appaiono sul video i seguenti caratte- 
ri; 

PC SR AC XR YR SP 
; GODO 00 00 00 00 00 

che, per chi non ha dimestichezza con 
il processore 6502, non hanno alcun si- 
gnificato. mentre rappresentano I regi- 
stri interni di tale processore (per il Ciò 
il 7501, come sopra accennato) e preci- 
samente: 

- PC - PROGRAM COUNTER: il regi- 


stro che contiene la locazione di memo- 
ria con l'istruzione da eseguire; 

- SR = STATUS REGI5TER o registro 
dei FLAG 

- AC = ACCUMULATOR: accumula- 
tore o registro A 

- XR = X RÉGI5TER: registro indice X 
“ YR = Y REGISTER: registro indice Y 

- SP » STACK POINTER; puntatore 
dello stack in pagina 1. 

Prima di passare ad esaminare le possi 
bilità operative offerte dal MONITOR 
conviene tener presente le seguenti re- 
gole; 

tutti i comandi vanno inseriti digitando 
la sola lettere iniziale (es. ASSEMBLER 
= Ah 

- i dati numerici susseguenti le istruzioni 
devono essere in notazione esadeeima- 
le; 

spaziare i comandi e i dati. 

Ecco, di seguito, cosa potete fare una 
volta entrati nel modo MONITOR del 
vostro C16. 


Esempio; 

D 8000 83 FF 

appariranno sul video le istruzioni del 
linguaggi macchina contenute nel 1° 
K della ROM dell'interprete BASIC. 

Se si esegue il comando D 
< $xxxx(l) > (seguita solamente dal- 
l 'indirizzo di partenza), verranno disas- 
semblate le prime 20 locazioni di me- 
moria a partire da tale indirizzo. 
Eseguendo solo 11 comando D vengono 
di sassembla te le prime 20 locazioni di 
memoria a partire dall'ultimo indirizzo 
presente nel registro PC (Program 
Counterh 

I dati, nella notazione esadeeimale, ven- 
gono visualizzati nella seguente forma: 
a sinistra la locazione dì memoria; poi 
il contenuto della stessa e, a destra, il 
codice mnemonico e l'operando della 
istruzione ASSEMBLY 

ASSEMBLER 

Consente di assemblare un programma 
scritto in linguaggio macchina ed inserir- 
lo in una determinata zona di memoria 
(RAM naturalmente). 





Formato: 

A <$xxxx(l)> <MNEMONlCO> 
[< OPERANDO >] 

$xxxx(l) = indirizzo dove sarà inserita 
l'Istruzione 

MNEMONICO = tipo di Istruzione (es,: 
LDA - STA - TAX - eco,. „) 
OPERANDO = indirizzo o numero se 
guente Ostruzione 

Esempio: 

0300 LDA # $51 quando mandato in ese- 
0302 STA $0C28 coitone con il comando 
0305 BRK G (GOTO) più avanti il- 

lustrato, stamperà al- 
itatelo della seconda ri- 
ga del video il carattere 
cod. 81 

Quando state utilizzando FASSEMBLY, 
il C16 provvede, ad inserimento della 
prima istruzione, a far comparire auto- 
maticamente a vìdeo la locazione d'ini- 
zio della successiva Istruzione. 

FILL 

Provvede a riempire una zona di memo- 
ria con un valore desiderato. 

Formato: 

F <$xxxx(l)> < $xxxx{2) > <Byte> 
$xxxx(l) = indirizzo dì partenza del 
blocco da riempire 
$xxxx(2} = indirizzo finale del blocco 
Byte - valore codice da inserire nella 
zona di memoria sopra indicata. 

Esempio: 

F 0C28 0C4F 51 vi mostrerà a video, 
nella seconda linea, il carattere di cod. 
Si . Questo perché fra le locazioni OC 00 
e 0FFF è ubicata la mappa video. 

TRANSFER 

Trasferisce il contenuto di una zona di 
memoria ad altra zona di memoria (per 
quest'ultima solo RAM). 

Formato: 

T < $xxxx( 1 ) > < $xxx x(2> > < $ xxx x(3) > 
$xxxx(l) - locazione iniziale dove è 
contenuto jI blocco dati da trasferire 
$xxxx{2) = locazione finale del blocco 
da trasferire 

$xxxx(3) = locazione iniziale della zona 
dove sarà trasferito il blocco dati 

Esempio: 

T FF81 FFFF 3000 

trasferisce la KERNAL JUMP TABLE 

in RAM a partire dalla locazione 12288. 


REGISTER 

Visualizza lo stato dei registri interni del 
micro 7501 allo stesso modo di quando 
si entra nel “MONITOR", come in pre 
cedenza illustrato. 

Formato: R 

Per variare lo stato di tali registri basta 
portare il cursore sul contenuto degli 
stessi, inserire il valore desiderato e 
premere il tasto RETURN. 


GOTO 

Manda in esecuzione un programma in 
linguaggio macchina a partire dall'indi- 
rizzo indicato. 

Formato: 

G [ < $xxxx>] 

$xxxx * 

indirizzo di partenza delta routine in lin- 
guaggio macchina. Se omesso, la routi- 
ne partirà dall’ultimo indirizzo contenu- 
to nel registro PC (Program Counter). 
Quando viene incontrata l'istruzione 
BRK (Break) la routine si interrompe ed 
a video viene visualizzato lo stato dei 
registri del 7501, come indicato nel mo- 
do “R\ 

Esempio: 

G 0300 {da eseguirsi dopo l’esempio 
del modo Assembler} manda in esecu- 
zione la piccola routine in precedenza 
indicata. 

Provate ora ad eseguire questo esem 
pio; G 3FF6, 

Piaciuto lo scherzetto? Non prendete- 
vela. se avevate in memoria un pro- 
gramma che vi era costato fatica, ma 
avete imparato qualcosa di nuovo. 

LO AD 

Simile alFistruzione BASIC, carica un 
programma. 

Formato: 

L < *Filename”> < Device > 

Filename ~ nome de! programma da 
caricare scritto fra gli apici. Possibile 
ometterlo. 

Device = unità da dove deve essere ca- 
ricato il programma (1= Tape, 8 - Di- 
sco), Valore di default = 1 

Con la sola istruzione L sì caricherà il 
primo programma presente sul nastro. 
Naturalmente, una volta caricato il prò 
gramma dovrete uscire dal MONITOR 
per utilizzarlo. 

SAVE 

Salva il contenuto dì una zona dì memo- 
ria sulla unità prescelta. 

Formato: 

S < “Filename™ > <Devìce> 

< $xxxx( 1 ) > < $xxxx(2) > 

Filename - nome assegnato al blocco 
dati da registrare 

Device * unità sulla quale registrare il 
blocco dati (1 — Tape, 8 ~ disco} 
$xxxx(l) - indirizzo iniziale del blocco 
dati 

$xxxx{2} - indirizzo finale del blocco 
dati. 

A differenza delFomonìmo comando 
BASIC. Il SAVE del MONITOR salva 
solamente il contenuto di una zona di 
memoria definita dal Fu fili zzai ore con gli 
indirizzi $xxxx{l) e $xxxx(2). che obbli- 
gatoriamente devono essere indicati. 
Pertanto, per registrare un programma 
scritto in BASIC con il SAVE del MONI 
TQR bisognerà indicare Fin dì ri zzo della 


locazione di memoria da dove ha inizio 
tale programma e l'indirizzo della loca- 
zione relativa alla fine dello stesso II 
primo, se non si è variato il contenuto 
delle locazioni $2B e $2C in pagina zero 
[che contengono ì] puntatore d'Intzio 
area destinata al programma BASIC), 
è sempre $1001. Il secondo è invece 
quello indicato nelle locazioni $2D e 
$2E [sempre in pagina zero), che con- 
tengono la locazione di memoria indi- 
cante la fine del programma BASIC e 
Fintelo deil'area destinata alle variabi 
IL 

Perciò bisognerà prima leggere il conte- 
nuto di tali locazioni con i\ comando M 
002B (più avanti illustrato), o con 11 co 
mando D 002B 002E, e quindi dare al 
comando S i codici contenuti nelle loca- 
zioni $2B e $2C quale 1* indirizzo e 
quelli contenuti nelle locazioni $2D e 
$2E quale indirizzo finale del blocco. 

Esempio: 

S “PROVA”, I IODI 12FF 

VERIFY 

Verifica se la registrazione di un pro- 
gramma è avvenuta correttamente o vi 
sono degli errori. 

Formato: 

V < '"Filename" > < Device > 

Filename - Nome del programma (pos 
sibilo ometterlo, ne! qual caso verifica 
il primo programma che incontra sul- 
I 1 unità). 

De vice = Numero corrispondente al- 
l’unità collegata (1 = Tape, 8 - discol 
Analoga alla corrispondente istruzione 
BASIC. 

COMPARE 

Confronta il contenuto di due blocchi di 
memoria e visualizza le differenze. 

Formato: 

C <$xxxx(l|> <$xxxx{2}> <$xxxx(3)> 
$xxxx(l) = Locazione di inizio del primo 
blocco da confrontare 
$xxxx|2) * Locazione finale del primo 
blocco da confrontare 
$xxxx(3} = Locazione d'inizio del secon- 
do blocco, 

HUNT 

Ricerca una stringa o una sequenza di 
dati in una parte della memoria e visua 
lizza la locazione iniziale dove sono ubi- 
cati i dati oggetto della ricerca. 

Formato: 

H <$xxxx(l)> <$xxxx(2}> <DA 
TI> 

$xxxx(l) » locazione iniziale della zona 
di memoria dove deve essere effettuata 
la ricerca 

$xxxx(2) - locazione finale della sud- 
detta zona di memoria 
DATI = oggetto della ricerca. Se tratta- 
si di una stringa, ia stessa dovrà essere 
preceduta dal sìmbolo “ T " apostrofo 
[Es. H 8000 FFFF READ e il MONI- 
TOR cercherà nella ROM la stringa 
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$1800 

FINE AREA BASIC. SE SI USA 
IL MODO GRAFI fiC 

_J 6144 

S1COO 

TABELLA LUMINOSITÀ 

MODO GRAPHIC 

| 7168 


tmm | t» 

VARIABILI DEL. SISTEMA 


SOfflHl 2048 

MAPPA COLORI VIDEO 

IOCOI) J 3072 

MAPPA CARATTERI VIDEO 
$1000 40% 

INIZIO AREA SASEC 


$ 1 7 FF 


6143 


$2000 


TABELLA COLORI MODO 
GRAPHIC 


8192 


MAPPA VIDEO MODO GRAPHIC 


$3FFF 


163S3 


FINE 16 K RAM E FINE AREA 
BASIC NEL MODO TEST 


36 K VUOTI PER FUTURE ESPANSIONI 



32767 


FIGURA 1/A NAPPA MEMORIA CI 6 
DA 0 A 32K (RAM) 


READ). Se trattasi invece di dati nume- 
rici. gli stessi dovranno essere spaziati 
l'uno dall’altro. (Es. H80G0 FFFF A5 
F4 C3), 

{DUMP) MEMORY 

Di fatto è il comando DUMP, ma visto 
che la D viene già usata per il DISAS- 
SEMBLER, viene chiamato MEMORY 
e si usa la M come comando. Visualizza 
il contenuto della zona dì memoria indi- 
cata in righe da 8 byte per volta, che 
riportano {sulla destra dello schermo) i 
caratteri in campo inverso dei corri- 
spondenti codici ASCII contenuti nelle 
singole locazioni oggetto del DUMP. 

Va segnalato che i codici da 00 a 1F e 
da 80 a 9F, corrispondenti al codici di 
controllo dei COMMODORE, vengono 
tutti visualizzati con un punto in campo 
inverso. 

Formato: 

M <$xxxx(l)> <$xxxx(£)> 

$xxxx{l) = indirizzo iniziale del blocco 
oggetto dei DUMP 

$xxxx(£) = indirizzo finale di tale blocco 



jcmo 


49152 

BASIC ESTESO 2 ROM 


Esempio: 

M 0000 GOFF visualizzerà il DUMP del- 
la pagina zero. 

Se viene eseguito solo il comando L M‘\ 
verrà visualizzato il DUMP di 8 byte a 
partire dalla locazione di memoria con 
tenuta nel registro PC 
Per modificare i valori dei byte oggetto 
dei DUMP sì può procedere ìn due mo- 
di. Il primo consìste nel portare il curso 
re lampeggiante sulla riga dove vi sono 
i byte da modificare: variare tali byte e 
premere il tasto RETURN, Il secondo 
nelFutilizzare il comando “>" {maggio- 
re di) nel seguente: 

Formato: 

> < $xxxx > < BYTE ( 1) > [ < BYTE 
(2) {8)>j 

$xxxx - locazione di memoria iniziale 

delia variazione del DUMP 

BYTE (1) - contenuto di tale locazio^ 

ne 

BYTE (2}H8) — possibilità di variare 
sino ad un massimo di 8 locazioni di me 
morìa, 


SDOGO 


53248 


TABELLA CON I CODICI 
DEI CARATTERI 


$EH0Q 


55296 

SISTEMA OPERATIVO E KERNAL 


Esempio: 

0300 FF FF FF FF FF mette nelle prime 
cinque locazioni della pagina 3 il valore 
FF [dee. 255) 

Naturalmente, il comando deve essere 
utilizzato solo in presenza del MEMO- 
RY 

EXIT 

Esce dal modo MONITOR e ritorna al 
BASIC. 

Formato: X 


FD00 

FF81 


64768 

65409 

]NDfRlZ2l I/O ED J REGISTRI 
DEL TED 


Infine, per la gioia di tutti coloro che 
vogliono esplorare il proprio C16 + viene 
riportata in figura 1) la mappa di memo- 
ria del computer. 


FIGURA t/B MAPPA MEMORIA C16 
DA 32 A 64K (BANCHI ROM) 
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QUALCOSA DI SUPER, DI INEDITO, 

DI IRRESISTIBILE 





La sottrivi sta con i giochi 
esclusivi per Commodore 64 
e Spectrum 48K 
importati dall’Inghilterra, mai 
presentati in Italia. 

Una sfida Jackson al già visto, 
al già fatto, al... già registrato. 


Ogni mese in edicola 

• la softrivista con: 

6 pagine di commento 
al supergame presentato; 

4 pagine di rubriche; 

22 pagine di listati scelti tra 
il meglio di quanto pubblicato 
in fatto di grafica, giochi, utility. 

• una cassetta originale con 
il SUPERGAME del mese 

Tutto a sole 10.000 lire 


È IN EDICOLA 
JACKSON SOFT 
SERIE ORO 


Corri in edicola, II vero gioco comincia solo adesso 
e se sei davvero bravo partecipa alla “sfida al campione”, 
utilizzando il tagliando che troverai sull’ultima pagina 
di copertina di ogni numero. 



GRUPPO 

EDITORIALE 

JACKSON 


mjovidfts 



di G. Hu 

t rad ed adatt 

di M. Cristuib Grizzi 


c' v 





In d)»p«nu ricerca di cristalli 
energetici le vostra astronave è 
atterrata sia un pianeta alieno. I 
cristalli sono però sorvegliati da 
molti soldati e da nn terribile 
tiroide. Muovetevi velocemente» 
perché il tempo scorre rapido... 
Un gioco eccitante per V1C 20 
ìneepanso e per Cb4. È richiesto 
nn joystick. 

I n questo gioco impersonate un espio 
ratore spazialo proveniente dal piane 
ta Terra Ad un certo punto del viaggio 
la vostra nave è incappata in un meteo- 
rite vagante e la quasi totalità delta ri- 
serva di energia è stata impiegata nel 
[ attivazione degli scudi protettivi. Vi 
trovate ora nei pressi di uno strano pia- 
neta ricco di cristalli energetici, che pos- 
sono ripristinare il livello di sicurezza 
nei serbatoi di energìa della vostra na- 
ve. 

Sfortunatamente, i cristalli sorto sorve 
gli an da soldati e da pericolosi droidi, e 
quindi inviate sul pianeta un robot della 
Serie Chomper per raccoglierli senza ri- 
schiare vite umane 

Usando il Joystick dalla sala dì controllo 
della nave, manovrate Chomper sulla 
superficie del pianeta per raccogliere j] 
maggior numero di cristalli nel più bre- 
ve tempo possibile Per. ogni cristallo 
raccolto ricevete 150 punti. Se incappa 
te in un soldato, ne perdete 450 e se 
un droide raggiunge Chomper. quest'ul- 
timo viene distrutto, provocando il falli- 
mento della missione e la vostra morte. 


Guerra centro il tempo 

Disponete di 45 secondi per raccogliere 
il maggior numero di cristalli possibile 
Se raggiungete i 3000 punti, verrete 
gratificati da tempo in bonus: il primo 
bonus e di 45 secondi, e ciascuno dei 
seguenti decrementi il successivo di 5 
secondi. Se guadagnate 6 bonus, potre 
te disporre di un nuovo Chomper in 
un'area differente del pianeta, con 45 


secondi di gioco aggiuntivi. Se desidera 
te più cristalli, premete il pulsante di 
fuoco, ma attenzione! Più cristalli signifì 
ceno anche più soldati! 

Il gioco inizia con un diagramma delle 
posizioni del joystick: spingendo que- 
st'ultimo verso destra si avrà una parti- 
ta facile, mentre verso sinistra si avrà 
una partita difficile Spingendo 11 joy- 
stick verso l'alto si incrementa il nume- 
ro dei droìdi: fino a sette nella versione 
per C64, e fino a due nella versione per 
VIC 20. Spingendo il joystick verso il 


basso $i provoca la fine del gioco. Dopo 
la vostra selezione il campo di gioco ed 
i droidi vengono sistemati casualmente 
sullo schermo. Il punteggio, il tempo ri- 
masto ed i bonus sono visualizzati nella 
parte alta dello schermo 
Alta fine del gioco, in funzione del pun 
teggio raggiunto, vi sarà chiesto di Inse 
rire i] vostro nome per la tabella dei 
massimi punteggi- digitate il vostro no- 
me e premete RETURN. Apparirà un 
altro diagramma con il massimo punteg- 
gio nella parte alta dello schermo. 
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Noie alle versione per VEC 20 

Se trovate il gioco troppo difficile, op 
pure troppo facile, il livello di gioco può 
essere modificato in molte maniere. Il 
modo più semplice è modificare il tem 
po di bonus cambiando il valore di R 
nella linea 390 si ottiene questo risulta- 
to. Modificando il 6 nell'ultima istruzio- 
ne della linea 210 si cambia il numero 
di bonus richiesti per ottenere un nuovo 
schermo, mentre modificando il valore 
dì F nelle lìnee 460-480 si può modifica- 
re il rapporto tra le mosse del Chomper 

Chomper versione per VIC 20 


1 0 PRINT" £CLR}"SPC ( 1 831 "CHQMPER" : FORI = 1 TO 
2000 : NEXT : GQT06 1 0 :rem 170 

20 M 2b M+ 1 :*X- 4 5 +G- 1 NT ( TI /6 Q } : I FX< 0THEN2 4 0 

: rem 44 

30 FRI NT’ 1 f RVS } l HOME } "SPC (7) ,r TEMPO 11 X" {SIN} 
" : GGSUB5 90 : X“X+X1 sY^Y+Yl : IFY-OTHENY-22 

: r em 146 

40 IFY”23THKNY«1 :rem 228 

50 IPX--* 1 THENX = 2 1 :rem 14 

70 IF- ( (PAND32) =0) THEN51 0 :rem 127 

80 FOKEC r 3 2 ; C - FRA [ 0 ) :X1*X: Yl =Y:Z=PEEK(C) : 

IFZ*32tHENPOKEC , 36:G0T01 40 treni 186 

90 PQKEC ,37: PO KE VG , 8 : 1 F Z * 34 THENS = S + 1 50:GO 
SUBÌ 90: GOTO! 20 :rem 21 5 

1 00 I F Z = 3 5TRENS~5 - 4 50 : G0S0B2 0 0 ì GOTO 1 30 

:rem 74 

110 POKEC , 33 : G0TO2 50 :rem 160 

1 20 I FS > ^LTHENPO ICES 2,0; POKES 3,0: GOTO 2 1 0 

: rem 204 


1 30 FORESI , 0:POKES2, 0 : POKES3 , 0 : POKES4 , 0 ; P 
RI NT" { RVS } {MOKE }£ DESI [ SIN 1 "S" t SIN] H 




: r era 

1 62 

135 

REM***** ***RGUTINE DROIDI* 1 

:rem 

*** 

1 24 

1 40 

Z=M/F:IFZOINT(Z) THEN2Q 

;rem 

1 78 

1 SO 

TFW=Cl THENW=0 

: rem 

32 


160 W=W+ 1 :X-X(W> :Y=¥(tf) : X=X+ ( - (XI >X) + (XI < 
X) 1 :Y-Y+{- ( Yl >Y} + (YÌ<Y1 ) : PO RED (WJ ,32 

: re:n 28 

1 70 D(W) = FNA ( 0 1 :X(W) =X:Y(W) *Y:Z=PEEK(D (W) 
) :POKED (W) ,33:IFZ>35THEN250 : rem 96 
! 80 GOTO 2 0 : rem 52 

IBS REM* ****** ROUTINE SONORE ************ 

: rem 1 56 

1 90 FORX=1 60TO1 98STEP3 : POKES2 , X: POKE53 , X: 

NEXTX ; RETURN : rem 4 9 

200 POKES4 ,, 1 78: FORESI ,178 :FORX=1 50T01 STEP 
- 3 : POKEVO , (X/1 0) : NEXT : PO KEVO , 6 ; RETURN 

:rem 1 

20 5 rem***********BONUS** * ************** 

; r era 154 

210 V-V+l : PRINT" f RVS } (HOME } "SPC (15) "*EX* 

£ 2 SPAZI} { 2 SIN} "V:L=S+ 2999: G=G+R : R 
=R- 5 : IFVO6THEN2 0 :rem 231 

220 PRINT" {CLR}( RVS} "SPC (5) "SCHERMO BONUS 
" : FORX-1TO750 :NEXT: PRINT" £CLR}" ;M=G:G 
= 0 ; R=4 5 : rem 163 

230 PRINT" (RVS } { HOME } "SPC £ I 5) "*EX* 

{ 2 SPAZI} { 2 S IN } " V : GOTO 51 0 : rem 24 6 
235 REM ******** * GAME OVER*************** 

:rem 196 

240 PRINT" {HOME}" : FORX-lTOl 0:PRINT:NEXT:P 
RI NT* { RVS ) { 5 SPAZI} FINE TEMPO" : FORX= 
1 TO 1 0 0 0 : NEXT : GOT02 6 0 :rem 56 

250 FORX=2 3QT01 5QSTEP-1 : FORESI , X: FORESI ,X 
ìNEXT: POKES3,0: FORESI ,0 :rem 108 


linguaggio macchina, e deve essere cari- 
cata da nastro posizionandosi con la 
cassetta in corrispondenza del l'inizio 
del programma e digitando: 

LOAD^ U 

Il programma andrà quindi mandato in 
esecuzione con: 

SYS 49152 

Chi non disponesse della cassetta dovrà 
utilizzare MLX con i seguenti pararne 
tri: 

indirizzo iniziale 49152 
indirizzo finale: 50891 

260 FRI NT" { HOME } " : FORX« 1 TOl 1 : PRINT : NEXT : P 
RINTSFC (6) "{RVSjGAME OVER" nera 136 
270 FOE Z ■ 1 TO 1 0 0 STEP 4 : PQKE3 6 8 7 9 , Z : POKES 2,1 
2 B+ABS ( INT ( S I N { Z ) *127)) : NEXT ; POKES2 , 0 

: t era 75 


275 

FORI = 1 TOl 000 : NEXT 

: rem 

25 

280 

POKE36B79, 1 1 0: PRINT" fCLR} 

" : POKE3 686 9 , 


240 

: rem 

113 

285 

REM* ****** *HIGH SCORE *************** 



: rem 

2 50 

290 

IFS<BSTHEN3Ì 0 

:rem 

1 7 

300 

BS=S: PRINT" (CLR } "SPC ( 5 1" GRAN PUNTEGGI 


O 1 " : PRINT" { HOME } ( 3 GIU'] 

IL TUO 

NOME 


?": INPUT" " ; N$ 

: rem 

8 

305 

REM* ******* * ANCORA? * **************** 



Etera 

179 

31 0 

FORI -1 TOl 000: NEXT 

; rem 

1 5 

311 

PRINT" (CLR} ( 3 GIU * } { 5 DES} PUNTI 

:"?S 


: PRINT" £ 3 Giti* } ! 2 DES }MI CUORE 

:";B 


S : PRINTSPC (81 "DI " 

j rem 

246 

320 

PRINT" ( 2 DES}"; N$ : PRINT" 

{HOME}": 

FORZ 


= 1 TQl 1 : PRINT: NEXT: PRINTSPC ( 6) "ANCORA? 


It 

: rem 

4 

330 

PRINT: PRINTSPC (7) "SI {GIU 1 

} " : rem 

73 

340 

PRINTSPC (B> "W" : PRINTSPC (7) "W W NUOVO 


GIOCO" : PRINTSPC ( 8} "W": PRINTSPC (BJ 

II 


(GIU 1 }NO" 

: rem 

86 

350 

GOSUB590 : I FX=I THEN390 

: rem 

16 

360 

IFY=- 1THENM--1 :GOTO390 

: rem 

66 

370 

IFY= 1 THENPOKE 36 B79 , 27 : PRINT" (CLR } 



£ BLU } " : END 

t rem 

194 

380 

GOTO 3 50 

: rem 

108 

385 

REM ****** IR IZ* VAR I AB ILI** 

: rem 

* * * 

157 


390 PEINT"{CLR}":POKE36869,24Q:ROKE36879, 
110:X=0:Y=0;Z«0:L«300Q:S*0:G^G:V-Q:R= 


45:W-0 : rem 14 

400 Xl*l 1 :Yl=1 I :C*7933:DEF FNA ( A) =76 BQ+Y* 
22+X : DEF FNB { A) - 1 NT (RND (TI ) *A+1 1 

:rem 73 

410 SI *36874ìS2=36875:S3-36876:S4-36B77:V 
0=3687 8:0-371 54 srem 1 1 0 

415 PA=37 1 3 7 : PB-3 71 52 : POKE3 71 39,0 

:rem 68 

420 IFM<0THENM=0:GQTQ5) 0 :rem 208 

425 REM* ********LIVELLO?* ******** ****** 

S rem 197 

430 M»0: PRINT" £CLR) { WHT } LIVELLO? 

£ 3 SPAZ I } " : PRINT" { 3 GIU'} 
j 3 SPAZ I } DUE DROIDI PRINT" (GIU 1 ^ 11 SP 

C { 8) M W" : rem 199 

440 PRINT^t 2 SPAZI}FAC/W W DIFF":PRINTS 
PC (81 n r SPRINT" { 2 GIU'Tf 3 SPAZI }U5A 

IL JOYSTICK" : rem 148 

450 FORZAI T060Q: NEXT trem 250 

460 GOSUB59Q : IFX'-l THKNCl ■ 1 :F«3:GOTO500 

: r em 125 

470 IFX=1THENC1^1 :F-4:GOTOSOO srem 250 

4 80 IFY=-1THENC1 -2 : F- 2 : GOTG5QO :rem 40 


e quelle dei droidt. 

Note alla versione per C64 

Con la differenza di permettere fino a 
sette droidi. la versione per C64 funzio- 
na esattamente come quella per VIC 
20. Se avete un televisore in bianco e 
nero, premete fi pulsante di fuoco al' 
l'inizio del gioco fino a che appaia una 
B. Ciò modifica » colori per renderli ben 
visibili anche su un apparecchio in bian 
co e nero o su un monitor monocroma ti 
co. 

La versione per Có4 è interamente in 
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490 GOTO460 ;rem 112 

500 FRI NT" { CLR} 11 :rem 249 

505 REM***** *1NIZ* SCHERMO*** ************ 

: r em 10 5 

Sì 0 PO KE 36369, 255: FORA = 3 4TO 3 5 : FOR Y= 1 TO 7 0 

: r em 160 

520 X=770! -FFNB(48 4) :Z=FNB(8) -1 ;IFZ=6THENZ 
= 7 i treni 1^ 

530 IFZ=2THENZ=3 : rem 233 

540 POKE30 72 0+X , % : PGKEX , A : NEXTY , A 

: r em 53 

550 PGKEVG,8:FORX-l 28TG2 55 : POKES2 , X : NEXT ; 
POKES2 , 0 : FQKEC , 36 : IFMOOTHEN2 0 

; rem 41 

555 REM* *****INIZ* DRQIDI * *************** 

: rem 66 


560 FORZATOCI :X=FNB(22) -1 : Y=FNB { 2 2) :D (Z) 



=FNA(G) :X(Z) =X;Y(Z) =Y 

; rem 

21 4 

570 

POKED <Z> ,33; NEXT 

: rem 

1 97 

580 

TI5 = , '0 000 00 ,I :GOT02 0 

; rem 

21 2 

585 

REM* ****** * JOYS TI C K* * *************** 



: rem 

1 6 


590 PÓKED , 1 27 :P=PEEK f PA) : X=- { ( PEEK (PB) AND 
1 28 ) = 0 ) + ( (PANDI 6 ) = 0 ) :PGKED ,255 

:rem 95 

600 Y= ( - ( (PAND8 ) =0} ) + ( { PAND4 ) =0) : RETURN 

:retn 191 

605 REM********CARATTERI** ************ ** 

: rem 14 

61 0 FORX = 74 24T074 3 1 :POKEX, 0 : NEXT : FORY = 3 3T 
037 : FQRX=0TG7 : READZ :POKE71 68+8*Y+X, Z i 
NEXTX, Y . : rem 10 

630 DATA 60, 66,90,66,60, 36,36,102,0, 0,0, 2 
4,24 ; rem 1 4 5 

635 DATA 0,0, 0,126,129, 165, 129, 153,18 9,12 
9,126 : rem 221 

640 DATA 60,1 2.6,90,126,235, 1 29,21 3,1 26,60 
,126,90,255,255,255,255, l26;GOTO390 

: rem 46 
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Chotop€f versione per C64 


4 91 52 : 032, 1 36, 1 98, 1 69 , 1 62, 1 41 ,070 
491 5 8 : 0 95, 1 95, 1 6 9 , 003, 1 41 , 1 1 2,209 
491 64 : 00 3,1 6 9,01 6,1 41 , 1 1 4 , 003,202 
491 70 :ì 6 9 , 039, 1 41 , 1 1 5 , 003,1 6 9,1 42 
491 76 : 000 , 141 , 032 , 208 , 141 , 033,067 
491 82 : 208, 1 69, 1 47 , 032,21 0 , 255,027 
4 91 88 : 0 32 , 229, 1 92 , 1 60 , 007,1 85,0 73 
491 94 : 035, 1 98, 1 53, 1 23 , 005,1 36 , 1 80 


4 92 00 : 0 1 6 , 247,1 60 , 0 1 0 , ] 85 , 04 3 , 1 97 
4 9206 : 1 98, 1 53, 1 98 , 005, 1 36, 01 6,248 
4 921 2 : 247 , 1 69,001 , 1 41 , 1 07 , 003,21 6 
4 921 8 : 1 60 , 005 , 1 85 , 054 , 1 98,1 53,053 
4 92 24 : 02 7, 00 6, 1 36, 01 6, 24 7, 1 69, 1 61 
492 30 : 001 , 1 41 , 1 1 3 , 003, 1 65, 1 62, 1 51 
492 36 : 1 05, 01 0, 1 97 , 1 62 , 208 , 252,250 
4 92 42 : 1 73,1 1 2,00 3,1 41 , 2 03 , 005,21 5 
4 9248 : 1 73, 1 07 , 003 , 009 , 048, 1 41 , 065 
4 92 54 : 083, 00 5 , 1 73 , 000 , 220 , 074,1 45 
4 92 60 : 1 76, 01 6, 2 38 , 1 07 , 003,1 73,0 53 

492 66 : 1 07 , 003,041 , 007 , 240 , 246,246 
4 92 72 : 1 41 , 1 07 , 003 , 076 , 082,1 92, 209 
4 9278 : 074, 1 76, 001 , 000 , 074, 1 76, 1 1 5 
49284 : O 0 8 , 1 69 , 21 0 , 1 41 , 1 11 , 003,006 
4 92 90 : 076 , 1 91 , 1 92, 0 74, 1 76,00 7,086 
4 92 96 : 1 69, 1 60, 1 41 , 1 1 1 , 003 , 208,1 68 
4 93 02 : 04 0 , 074, 1 76 , 029,1 73,1 1 3,243 

493 0 8 : 003 , 208, 1 79 , 1 73 , 0 95 , 1 95 , 241 
4931 4 : 0 73, 01 1 , 1 41 , 0 95, 1 95 , 1 73,082 
493 20 ; 1 1 2, 00 3, 0 73, 001 , 1 41 , 1 1 2,098 
4 93 26 : 003, 1 69, 001 , 1 41 ,1 1 3,00 3,092 
493 32 : 076, 0 82, 1 92, 1 69 , 000,1 41 , 072 
493 38 : 1 1 3, 00 3, 0 76, 0 82,1 92 , 032,1 72 
493 44 : 1 92, 1 95, 03 2, 02 9, 1 96, 03 2, 1 00 
49350 : 249 , 192 , 032 , 081 , 1 95 , 032,21 1 

493 56 : 0 52 , 1 94 , 032,00 0 , 1 94,03 2,1 96 
4 93 62 : 067 , 1 93,0 32 , 004,1 93 , 032,21 9 
4 93 63 : 0 88, 1 93 , 032,1 53,1 96,1 73,027 
4 93 74 : 1 41 , 002 , 240 , 233 , 076, 221 , 1 1 1 
49380 : 1 92 , 169 , 001 , 160 , 000 , 153,135 
4 93 86 : 0 00, 21 6, 1 53 , 000,21 7,1 53,20 5 
49392 : 000 , 21 8 , 1 53 , 000 , 21 9 , 136,198 
4 93 98 : 208 , 241 , 096,1 60 , 0 1 8 , 1 85 , 1 30 
4 9404 : 0 77, 1 98, 1 53, 01 0 , 004,1 36,062 
4941 0 : 01 6 , 247 , 056 , 173 , 077 , 003,062 
4 941 6 : 237 , 062 , 003, 1 41 , 079 , 003,021 
4 942 2 : 1 73 , 078 , 003 , 237 , 063 , 003,059 
4 942 8 : 01 3 , 079 , 003,1 76 , 041 , 238,058 
4 94 34 : 0 81 , 003,1 73 , 077 , 003 , 024,1 31 
4 944 0 : 1 05, 1 84, 1 41 , 077 , 003,1 73,203 
4 9446 : 0 78 , 003, 1 0 5, 01 1 , 141 , 078,1 98 
4 94 52 : 003 , 1 73 , 073,00 3 , 024, 1 09,1 73 
49458 : 076 , 003 , 141 , 073 , 003 , 173,007 
4 9464 : 0 76 , 003, 24 0, 00 6, 0 56, 2 33, 1 58 
4 94 70 : 005, 1 41 , 076 , 003 , 096,1 69,040 
4 9476 : 0 0 0 , 1 41 , 064,00 3,1 73 , 062,255 
4 9482 : 003, 1 41 ,071 , 003,1 73 , 063,01 6 

494 88 : 003,1 41 , 072 , 003 , 032, 1 51 , 226 
49494 ; 1 93 , 096 , ì 69 , 01 5 , 1 41 , 064,252 
4 9500 : 003 , 1 73 , 073,00 3,1 41 , 065,038 
4950 6 : 003, 1 6 9 , 000, 1 41 , 066 , 003,224 
4951 2 : 032 , 168 , 193 , 173 , 081 , 003,242 
4 951 8 :1 41 , 065 , 003, 1 69 , 000,1 41 ,1 1 7 

49 524 ; 066, 00 3, 1 69, 03 2, 1 41 , 064,0 79 
4 9530 : 00 3 , 032, 1 68 , 1 93 , 096 , 206,052 
49536 : 075 , 003 , 208 , 01 8 , 206 , 073,199 
49542 : 003 , 173 , 073 , 003 , 201 , 255,074 
4954 8 : 20 8 , 00 3 , 07 6, 1 30, 1 97, 1 6 9,1 55 
4 9554 : 00 9 , 1 4 1 , 075 , 003 , 096,1 73,1 31 
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49560 : 0 7 1 , 003, 0 56 , 233 , 016 , 141 , 1 60 
49566 : 065 , 003 , 173 , 072 , 003 , 233, 195 
49572 : 039 , 1 41 , 066 , 003 , 1 69 , 000,070 
49578 : 1 41 , 067 , 003 , 141 , 068 , 003,081 
495 84 :1 41 , 069 , 003, 1 62, 01 5, 01 4, 068 
49590 : 065 , 003 , 046 , 066 , 003 , 120, 229 
49596 : 248 , 173 , 067 , 003 , 109 , 067,087 
49602 : 003 , 141 , 067 , 003 , 173 , 068, 137 
49608 : 003 , 109 , 068 , 003 , 141 , 068, 080 
4 961 4 : 003, 1 73 , 069 , 003, 1 09 , 069, 1 20 
49620 : 003 , 141 , 069 , 003 , 21 6 , 088, 220 
49626 : 202 , 01 6 , 216 , 1 62 , 002 , 189,237 
49632 : 067 , 003 , 072 , 074 , 074 , 074,076 
4 9638 : 074 , 032 , 244, 1 93, 1 04,041 , 1 50 
49644 : 015 , 032 , 244 , 193 , 202 , 016, 170 
49650 : 236 , 096 , 009 , 04 8 , 238 , 064, 165 
49656 : 003 , 172 , 064 , 003 , 1 53 , 000, 131 
49662 : 004 , 096 , 1 65 , 162 , 105 , 005,023 
49668 : 1 97 , 162 , 208 , 252 , 032 , 127,214 
49674 : 193 , 096 , 165 , 162 , 197 , 162, 217 
49680 : 240 , 252 , 096 , 072 , 138 , 024,070 
49686 : 1 01 , 251 , 133 , 251 , 165 , 252,1 51 
49692 : 105 , 000 , 133 , 252 , 104 , 096,206 
49698 : 072 , 134 , 254 , 165 , 251 , 056, 198 
49704 : 229 , 2 54 , 133 , 251 , 165 , 252, 044 
4971 0 : 233 , 000 , 133 , 252 , 104 , 096, 096 
49716 : 1 60 , 000 , 173 , 060 , 003 , 133,069 
49722 : 25 ì , 173 , 061 , 003 , 133 , 252, 163 
49728 : 169 , 032 , 145 , 251 , 173 , 000, 066 
49734 : 220 , 074 , 176 , 005 , 162 , 040,235 
49740 i 032 , 034 , 194 , 074 , 176 , 005,079 
49746 ; 1 62 , 040 , 032 , 01 9 , 1 94 , 074,091 
49752 : 1 76 , 005 , 162, 001 , 032 , 034, 24 2 
49758 : 1 94 , 074, 1 76 , 005, 1 62,001 ,1 94 
49764 : 032 , 01 9 , 1 94 , 074 , 176 , 003,086 
49770 : 032 , 081 , 195 , 165 , 251 , 233, 039 
49776 : 03 9 , 1 41 , 079 , 003 , 1 65 , 252,023 

497 82 : 233 , 004, 01 3 , 079 , 003, 1 76,1 1 4 
49788 : 013 , 165 , 251 , 024 , 105 , 192, 106 
49794 : 1 33,2 51 ,1 65,2 52,1 0 5,00 3,01 5 
49800 : 1 33 , 252 , 165 , 251 , 233 , 232,122 
49806 ; 1 41 , 079 , 003 , 165 , 2 52 , 233, 247 
49812 : 007 , 01 3 , 079 , 003 , 144 , 01 3, 1 51 
49818 : 1 65 , 251 , 056 , 233 , 192 , 133, 160 
49824 : 251 , 165 , 252 , 233 , 003 , 133, 173 

498 30 : 252 , 177 , 251 , 201 , 035 , 208, 01 0 
49836 : 042 , 173 , 062 , 003 , 024 , 1 05,069 
49842 : 1 50 , 141 , 062 , 003 , 173 , 063,002 
49848 ; 003 , 105 , 000 , 1 41 , 063 , 003,243 
498 54 : 201 , 253 , 144 , 003 , 076 , 182, 025 
498 60 : 1 98, 1 69 , 038,1 41 , 070 , 003,047 
49866 : 169 , 129 , 141 , 004 , 212 , 169,002 
49872 : 00 9,1 41 , 001 ,21 2,0 76 , 063,1 98 
49878 : 195 , 162 , 128 , 142 , 004 , 21 2,033 
49884 : 206, 1 09 , 003 , 174 , 109 , 003, 056 
49890 : 1 42, 001 , 21 2 , 224, 01 0 , 20 8, 255 
49896 : 005 , 162 , 034 , 142 , 011 , 21 2, 030 
49902 : 1 62 , 037 , 142 , 070 , 003 , 201, 085 
49908 : 036 , 208 , 065 , 056 , 173 , 062,076 
49914 : 003 , 233 , 209 , 141 , 079 , 003,1 50 


49920 

:1 73 

, 063 

, 003 

,233 

,040 

, 01 3 

,01 3 

49926 

: 079 

,003 

, 1 76 

, 01 3 

, 1 69 

, 01 6 

,206 

49932 

:1 41 

,062 

,003 

,169 

,039 

,141 

,055 

49938 

: 063 

,003 

, 076 

, 040 

,195 

,173 

,0 56 

49944 

: 062 

,00 3 

, 056 

,233 

,194 

,141 

,201 

49950 

: G 62 

, 003 

,173 

, 063 

,003 

, 233 

,055 

49956 

i 001 

,141 

,063 

, 003 

, 1 69 

,035 

,192 

49962 

:ì 41 

,01 1 

, 21 2 

, 169 

,020 

, 1 41 

, 22 4 

49968 

: 00 8 

,21 2 

, 1 41 

,109 

,003 

, 076 

,085 

49974 

: 063 

,195 

, 201 

, 034 

,208 

,003 

,246 

49980 

: 076 

, 1 30 

, 1 97 

, 1 60 

,000 

, 1 73 

, 028 

49986 

: 070 

,00 3 

,145 

,251 

, 1 65 

,251 

,1 83 

49992 

:1 41 

,0 60 

, 003 

,165 

,252 

,141 

, 066 

49998 

: 06 1 

, 003 

, 096 

, 1 60 

,000 

, 1 73 

,059 

50004 

: 02 7 

, 21 2 

,074 

,074 

,074 

,074 

,107 

5001 0 

: 074 

, 201 

, 006 

,240 

,244 

, 1 69 

, 000 

5001 6 

: 00 1 

, Ì 53 

, 040 

,21 6 

, 1 53 

,000 

,147 

50022 

: 2 1 7 

, 1 53 

, 000 

, 21 8 

,153 

, 230 

, 049 

50028 

i 21 8 

, 200 

, 208 

, 227 

, 1 62 

, 027 

,126 

50034 

: 032 

,1 27 

, 1 93 

, 202 

,208 

,2 50 

,102 

50040 

: 1 62 

,070 

,169 

,232 

, 1 33 

, 253 

,115 

50046 

:1 69 

,003 

, 1 33 

,254 

, 1 60 

,004 

,081 

50052 

;1 73 

, 027 

, 21 2 

,02 4 

, 1 01 

,253 

, 1 54 

50058 

: 1 33 

,2 53 

, 1 65 

,254 

, 1 05 

, 000 

, 024 

50064 

zi 33 

,254 

, ì 36 

, 208 

,239 

, 1 65 

,255 

50070 

: 253 

,056 

, 233 

, 040 

, 1 65 

,254 

,127 

50076 

: 23 3 

, 004 

, 1 44 

,21 8 

,160 

,000 

,147 

50082 

: ì 73 

, 027 

, 21 2 

,016 

,004 

, 1 69 

,251 

50088 

; 03 5 

, 208 

,002 

,169 

,036 

,145 

,251 

50094 

: 253 

, 032 

,012 

, 1 94 

,202 

, 208 

,051 

501 00 

;T 97 

, 1 60 

,039 

, ! 69 

,001 

, 1 53 

, 131 

501 06 

: 000 

,216 

, 1 36 

, 01 6 

,250 

,096 

, 1 32 

501 1 2 

: 1 20 

, 165 

,001 

,041 

,251 

, 1 33 

, 135 

501 1 8 

: 0 01 

, 1 60 

,000 

, 185 

,000 

,208 

,240 

501 24 

: ì 53 

, 000 

,0 56 

, 185 

,000 

, 209 

, 039 

501 30 

: 1 53 

,00 0 

,057 

,136 

,208 

, 241 

, 237 

501 36 

: 1 65 

, 001 

,009 

,004 

, 1 33 

,001 

, 01 7 

501 42 

: 1 73 

, 024 

,208 

, 041 

, 240 

,009 

, 149 

501 48 

: 0 1 4 

,141 

,024 

, 208 

,088 

, 1 60 

,095 

501 54 

: 039 

,185 

, 245 

,195 

, 1 53 

, 01 6 

,043 

50160 

: 0 57 

,136 

,01 6 

,247 

,096 

,060 

,084 

501 66 

: 0 66 

, 090 

,066 

, 060 

,036 

,036 

,088 

501 72 

: 1 02 

,000 

,000 

,000 

,024 

,024 

,146 

50178 

; 000 

, 000 

,000 

, 1 26 

,129 

, 1 65 

,166 

50184 

; 1 29 

,153 

, 1 89 

, 129 

,1 26 

,060 

, 026 

50190 

: 1 26 

,090 

,126 

,2 35 

,129 

, 21 3 

,165 

50196 

: 1 26 

,060 

, 1 26 

,090 

,255 

, 255 

,164 

50 202 

: 2 55 

, 255 

,126 

, 169 

,147 

,032 

,242 

50 20 8 

; 2 1 0 

, 255 

,169 

,00 6 

,141 

,032 

,077 

5021 4 

: 208 

,141 

,033 

, 208 

,169 

,01 6 

,045 

50220 

: 1 41 

r 062 

,003 

, 169 

, 039 

,141 

,087 

50226 

: 063 

,003 

, 169 

,204 

,141 

,060 

,178 

50232 

: 003 

, 169 

,005 

,141 

,061 

,003 

,182 

50238 

: 1 69 

,048 

,141 

,073 

, 003 

, 1 69 

, 1 53 

50244 

: 04 5 

,141 

,076 

,003 

, 1 69 

,009 

, 255 

50250 

: 1 41 

,075 

,003 

,169 

,199 

,141 

,034 

502 56 

r 077 

,003 

, ì 69 

,050 

,141 

,078 

,086 

50262 

: 003 

,169 

,000 

,141 

,081 

,003 

,227 

50268 

; 1 62 

,008 

, 169 

,006 

,157 

,093 

,175 

50274 

: 0 03 

,173 

,027 

,21 2 

, 1 57 

,083 

,241 
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50280 

:003 

,202 

,016 

,242 

,169 

,003 

,227 

50286 

: 1 41 

,108 

,003 

,160 

,023 

,169 

,202 

50292 

: 000 

,153 

,000 

,21 2 

,136 

,016 

,121 

50298 

: 2 50 

,169 

,01 5 

,141 

,024 

,212 

,165 

50304 

s 1 69 

,01 7 

,141 

,00 5 

,212 

,141 

,04 5 

5031 0 

SOI 2 

,21 2 

,169 

,245 

,141 

,00 6 

,151 

5031 6 

; 21 2 

,141 

,01 3 

,21 2 

,169 

,129 

,248 

50322 

: 1 4 1 

,01 5 

,21 2 

,141 

,01 8 

,21 2 

,117 

50328 

; 096 

,169 

,000 

,141 

,082 

,003 

,131 

50334 

: 1 73 

,027 

,21 2 

,205 

,111 

,003 

ri 21 

50340 

: 1 76 

,003 

, 0 76 

,069 

,197 

,173 

,090 

50346 

; 060 

,003 

,172 

,061 

,00 3 

,032 

,245 

50352 

: 004 

,197 

,142 

,104 

,003 

,141 

,079 

50358 

; 1 03 

,00 3 

,172 

,082 

,003 

,185 

,21 8 

50364 

: 083 

,003 

,133 

,251 

,185 

,093 

,168 

50370 

: 00 3 

,168 

,133 

,252 

,165 

,251 

,142 

50376 

:032 

,084 

,197 

,142 

,106 

,003 

,252 

50382 

; 1 4 1 

,105 

,003 

,169 

,032 

,160 

,048 

50388 

: 000 

,145 

,251 

,173 

,105 

,003 

,121 

50394 

: 205 

,103 

,003 

,240 

,01 5 

,144 

,160 

50400 

; 00 8 

,162 

,001 

,032 

,034 

,194 

,143 

50406 

; 076 

,238 

, 1 96 

,162 

,001 

,032 

,167 

5041 2 

: 0 1 9 

,194 

, 1 73 

,106 

,003 

,205 

, 1 68 

5041 8 

: 1 04 

,003 

,240 

,01 5 

,144 

,008 

,244 

50424 

: 1 62 

,040 

,032 

,034 

, 1 94 

,0 76 

,018 

50430 

: 00 5 

,197 

,162 

,040 

,032 

,01 9 

,197 

50436 

: 1 94 

,160 

,000 

,177 

,251 

,201 

,219 

50442 

: 037 

,144 

,003 

,076 

,130 

,197 

,085 

50448 

: 201 

,034 

,208 

,01 3 

,172 

,0 82 

,214 

50454 

: 00 3 

,185 

,083 

,003 

,133 

,251 

,168 

50460 

: 1 8 5 

,093 

,003 

,133 

,252 

,172 

,098 

50466 

; 082 

,003 

,165 

,251 

, 1 53 

,0 83 

,003 

50472 

: 003 

,165 

,252 

, 1 53 

, 093 

,003 

, 1 97 

50478 

j 1 60 

,000 

,169 

,03 4 

, 145 

,251 

,037 

504 84 

: 1 65 

,251 

,024 

,105 

,000 

,133 

,21 8 

50490 

: 251 

,165 

,252 

, 1 05 

,212 

,133 

, 1 52 

50496 

: 252 

, 1 69 

,001 

,145 

,251 

,238 

,096 

50502 

: 082 

,003 

,173 

,0 82 

,003 

,205 

,106 

50508 

: 1 07 

,003 

,2 40 

,003 

, 076 

, 1 84 

,177 

5051 4 

: 1 96 

,096 

,141 

,079 

,003 

,152 

,237 

50520 

: 0 56 

,23 3 

,004 

,141 

,080 

,003 

,093 

50526 

: ì 62 

,000 

,173 

,080 

,003 

,208 

,208 

50532 

: 007 

,173 

,079 

,003 

, 201 

,040 

,091 

50538 

: ì 44 

, 021 

, 1 73 

,079 

,003 

,056 

, 070 

50544 

: 233 

, 040 

,141 

,079 

,003 

,173 

,013 

50550 

: 080 

,00 3 

,233 

,000 

,141 

,080 

,143 

50556 

: 0 0 3 

,232 

,076 

,096 

, 1 97 

,096 

,056 

50562 

: 032 

,229 

, 1 92 

,169 

,032 

, 1 60 

,176 

50568 

: 2 00 

,153 

, 039 

, 004 

,136 

, 208 

,108 

50574 

: 2 50 

,056 

,173 

,062 

,003 

,237 

,155 

50 580 

: 11 4 

,00 3 

,141 

,079 

,003 

,173 

,149 

50586 

: 0 63 

,003 

,237 

,115 

,003 

,01 3 

, 076 

50 592 

s 079 

,003 

,144 

,012 

,173 

,062 

,1 21 

50598 

: 003 

,141 

,114 

, 003 

, 1 73 

,063 

,151 

50604 

: 003 

,141 

,115 

, 003 

, 1 69 

,001 

,092 

50610 

;1 41 

,113 

,003 

,169 

,000 

,141 

,233 

5061 6 

; 032 

,208 

,141 

,033 

,208 

,141 

,179 

50622 

; 00 8 

,21 2 

, 1 60 

,008 

, 1 85 

,01 1 

, 006 

50628 

*198 

, 1 53 

,055 

,004 

,136 

,01 6 

,246 

50634 

: 247 

,160 

,014 

, 1 85 

,020 

, 1 98 

,002 
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50640 

: 1 53 

,132 

,004 

, 1 36 

,01 6 

,247 

,128 

50646 

= 160 

,00 9 

, 1 85 

,060 

,198 

, 1 53 

,211 

50 6 52 

: 2 1 1 

,004 

, 1 36 

,016 

,247 

f 1 73 

,239 

50658 

:1 14 

,003 

,141 

,071 

,003 

,173 

,21 9 

50664 

: 1 1 5 

,003 

,141 

,072 

,003 

,169 

,223 

50670 

: 2 20 

,141 

,064 

,003 

,032 

,151 

,081 

50676 

: 1 93 

,173 

,000 

,220 

,041 

,01 6 

,119 

50682 

: 2 0 8 

,008 

,173 

,113 

,003 

,208 

,195 

50688 

: 2 44 

,076 

,023 

,192 

,169 

,000 

, T 92 

50694 

:ì 41 

#113 

,003 

,240 

,234 

,007 

,232 

50700 

: 00 1 

,01 3 

,005 

,0 32 

,01 5 

,022 

,100 

50706 

1005 

,01 8 

,032 

,01 6 

,018 

,005 

,112 

5071 2 

: 01 9 

,01 9 

,032 

,020 

,018 

,00 9 

,141 

5071 8 

: O 07 

,007 

,00 5 

,01 8 

,032 

,030 

,129 

50724 

: 032 

,004 

,018 

,01 5 

,009 

,004 

,118 

50730 

: 01 9 

,005 

,001 

,01 9 

,02 5 

,060 

,171 

50736 

: 032 

,062 

,008 

,001 

,01 8 

,004 

,173 

50742 

: 0 22 

,032 

,017 

,021 

,009 

,020 

,175 

50748 

: 0 32 

,008 

,009 

,032 

,01 9 

,003 

,163 

50754 

: 01 5 

,01 8 

,005 

,032 

,003 

,008 

,147 

50760 

: 01 5 

,01 3 

,016 

,005 

,01 8 

,020 

,159 

50766 

: 0 09 

,01 3 

,005 

,032 

,032 

,032 

,2 01 

50772 

: 0 32 

,032 

,032 

,032 

,032 

,032 

,02 0 

50778 

: 0 32 

,032 

,042 

,005 

,024 

,042 

,011 

50784 

: 02 5 

,01 5 

,021 

,032 

,001 

,01 8 

,208 

50790 

: 00 5 

,032 

,01 5 

,01 4 

,005 

,032 

,205 

50796 

: 0 1 5 

,006 

,032 

,020 

,008 

,005 

,194 

50802 

: 032 

,006 

,005 

,023 

,032 

,020 

,232 

50808 

: 01 5 

,0 32 

,023 

,009 

,014 

,0 32 

,245 

50 81 4 

: 001 

,02 0 

,032 

,003 

,008 

,01 5 

,205 

50820 

: 01 3 

,016 

,005 

,01 8 

,032 

,029 

,245 

50826 

: 1 96 

,169 

,000 

, 1 60 

, 1 50 

,153 

, 1 98 

50832 

: 063 

,003 

, 1 36 

,208 

,250 

,032 

,068 

50838 

: 229 

, 1 92 

,160 

,006 

, 185 

,070 

,224 

50844 

s 1 98 

,153 

, 200 

,005 

,136 

,01 6 

,096 

50850 

: 24 7 

, 1 60 

,01 4 

,185 

,020 

,1 98 

,218 

50856 

lì 53 

,020 

,006 

, 1 36 

, 01 6 

,247 

, 234 

50862 

: 1 73 

, 000 

, 220 

,041 

, 01 6 

,208 

,064 

50868 

: 24 9 

,096 

,169 

,147 

, 032 

,21 0 

,059 

50874 

: 2 55 

,032 

, 229 

, 1 92 

,160 

,039 

, 069 

50880 

; 1 85 

,096 

,198 

,153 

, 1 84 

,005 

,245 

50886 

:1 36 

,01 6 

,247 

,076 

,130 

,162 

,197 
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di S. Resstcr 

trad ed adatt. 

di M. Cristuib Grizzi 



Un pazzo arroccato sai tetto del 
vostro palazzo sta gettatilo bom- 
be incendiarie sulla strada sot- 
tostante. Il vostro compito con- 
siste nel manovrare una tinozza 
piena d'acqua per raccogliere e 
disattivare le bombe incendia- 
rie. Un gioco “arcade style” in 
versione per VIC 20 inespanso e 
per C64, E' richiesto un joy- 
stick. 


I l vostro solita me nte quieto quartiere 
viene improvvisamente disturbalo da 
una serie di esplosioni e di fiammate. 
Fortunatamente intervenite voi. muniti 
di una tinozza, c intercettate pronta- 
mente tutte le bombe che un pazzo lan- 
cia sulla strada 

Quando appare la schermata iniziale vi 
verrà chiesto di scegliere tra 15 diversi 
livelli di difficoltà, dove 1 è il più facile 
e 15 il più difficile, 

Usando un joystick (Porta 2 per il C64I 
spostate la tinozza a destra e sinistra 
per raccogliere le bombe prima che toc 
chino il suolo. La tinozza può uscire dal 
bordo dello schermo e rientrare dal bor- 
do opposto: ciò è estremamente utile 
giocando ai livelli più difficili. 

Se una bomba raggiunge il suolo, esplo- 
derà e voi perderete una delle vostre 
quattro tinozze. II gioco ha termine sol- 
tanto quando avete terminato le tinozze 
a disposizione; a questo punto potrete 
scegliere un altro livello di difficoltà e 
giocare ancora 

Se l'azione diventa troppo frenetica, o 
se desiderate una pausa nel bel mezzo 
del gioco, premete la barra spaziatrice 
II gioco rimarrà “congelato" fino alla 
pressione del tasto CTRL 

Note alla versione per VIC 20 

La versione per VIC 20 è simile a quella 
per C64, ma contiene alcune differen* 


ze Avete tre tinozze invece di quattro 
e cinque livelli dì difficoltà invece di 
quindici. In ogni caso, Ea velocità di ca- 
duta delle bombe aumenta per ogni 
bomba che riuscite ad intercettare, e 
diminuisce per ogni bomba che vi sfug 
ge e raggiunge il suolo. 

La versione per VIC 20 visualizza inol- 
tre il massimo punteggio raggiunto, il 
punteggio corrente, la velocità delle 


bombe e le tinozze rimaste II tasto 
SHIFT LGCK è usalo come tasto di 
pausa II programma, pur essendo total 
mente in linguaggio macchina, si carica 
da cassetta normalmente (senza biso- 
gno dell'indirizzo secondario I) e si atti- 
va con un semplice RUN. 

Chi non disponesse della cassetta alle- 
gata alla rivista dovrà inserire un espan- 
sione di memoria da almeno 8 Kbyte, 
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accendere il computer e digitare in ma- Quindi occorrerà caricare MLX e utili Una volta registrato il programma su 
do diretto la seguente lineai zare come parametri; nastro o disco non sarà più necessaria 

indirizzo iniziale: 6291 l'espansione di memoria per il suo cari- 

POKE642,32:SY558232 indirizzo finale: 7682 camento 


Kablam! versione per VIC 20 

6291 : 01 1 ,01 6 , 000 , 000 , 158 , 052, 128 

62 97 : 049 , 04 8, 0 57 , 000 , 000 , 000, 051 

6303 : 169 , 000 , 141 , 092 , 003 , 1 4 1 , 1 93 
6309 : 093 , 003 , 169 , 024,1 41 ,01 5,098 
631 5 : 1 44 , 032 , 1 30 , 020 , 032 , 100,11 7 
6321 : 01 6 , 032,01 2,01 8 , 032 , 074,105 

632 7 : 01 7 , 169 , 007 , 1 41 , 074 , 003,0 82 
6333 : 1 6 9,00 3,1 41 , 064 , 003 , 173,2 30 
6339 : 0 76 , 00 3, 01 6 , 024 , 032 , 235,069 
634 5 : 0 1 7, 1 72,0 74 , 003, 1 96, 2 51 , 146 
6351 : 208 , 003 , 076 , 077 , 01 6 , 032, 107 

63 57 : 0 55, 01 9, 0 32 , 030,01 9 , 169,02 5 
6363 : 01 0 , 1 41 , 076 , 003 , 206 , 076, 21 9 
636 9 : 003 , 032,1 40,01 7 , 032,1 31 , 068 
6375 : 01 6 , 032 , 078 , 01 9 , 032,21 9,1 1 5 
6 381 : 01 9 , 173 , 072 , 003 , 208 , 207,1 51 
6387 : 0 76 , 245 , 018 , 169 , 000 , 141, 124 
6393 : 060 , 003, 141 ,061 , 003,141 ,146 
6 399 : 074 , 003, 141 , 108,021 ,141 ,231 
640 5 : 064 , 003 , 032 , 074, 01 7 , 169,108 
6411 : 00 3,1 41 , 0 72 , 003 , 1 69 , 0 1 0 , 1 53 
641 7 : 1 41 , 076 , 003 , 096 , 169 , 239,229 
6423 : 141 , 019 , 145 , 173 , 017 , 145,151 

64 29 : 041 , 016 , 208 , 003 , 206 , 108,099 

64 3 5 : 021 ,1 69,1 27,1 41 , 034,1 45,1 60 
64 41 ; 173 , 032 , 145,041 ,1 28 , 208,000 

644 7 : 003 , 238 , 108, 021 , 173,1 08,186 
64 53 : 021 ,041 , 01 5,1 41 , 1 08,021 , 1 44 
64 59 : 20 8 , 006, 201 , 002,1 76 , 002,1 42 
6465 : 1 69 , 00 1 ,201 , 011, 1 44 , 002, 081 
64 71 : 169, 01 2 , 141 ,0 64 , 003,1 68,1 1 6 
6477 : 1 62 , 002 , 185 , 162 , 031 , 208,059 
64 83 : 008, 1 69 , 032, 1 53, 1 62 , 031 ,126 
64 89 : 0 32, 0 55, 01 7 , 185 , 184 , 031 ,081 
64 9 5 ; 208 , 00 8 , 169, 0 32 , 153 , 184, 081 
6 501 : 031 ,0 32 , 055,01 7 , 185,2 06,115 

650 7 : 0 31 , 208 , 008,1 69 , 032,1 53,1 96 

651 3 : 206, 031 , 032 , 055,01 7 , 200,1 42 

651 9 : 202,01 6,21 3 , 1 72,0 64,00 3,021 
6525 : 1 96 , 252 , 240 , 071 , 164 , 252,020 
6531 : 1 69 , 032 , 1 62 , 003 , 1 53 , 1 84,066 

6537 : 0 31 ,1 53,2 06,031 , 200 , 202,1 92 
654 3 : 01 6,24 6 , 172 , 064 , 003,1 69,045 
654 9 : 0 27,1 53,1 84 , 031 , 1 53 , 206,1 35 
6555 : 031 , 1 32,2 52 , 1 69 , 000,1 53,1 24 
6561 : 1 84 , 151 , 153 , 206 , 151 , 200,182 
6567 : 1 69 , 028 , 1 53 , 1 84,031 , 153,117 
6 573 : 206 , 031 , 169 , 000,1 53 , 184,1 48 
6579 : 1 51 , 1 53 , 206 , 1 51 , 200 , 1 69 , 1 85 
6585 : 0 29, 1 53,1 84,031 , 1 53 , 206,1 73 
6591 ; 031 , 169 , 000 , 153, 1 84, 1 51 ,11 1 


6597 

:1 53 

,206 

,151 

,096 

,173 

,082 

,034 

6603 

: 00 3 

,240 

,003 

,206 

,082 

,003 

,228 

6609 

: 2 38 

,060 

,003 

,173 

,060 

,003 

,234 

66 Ì 5 

: 2 08 

, QQ 3 

,238 

,061 

,003 

, 1 62 

,122 

6621 

: 004 

,160 

,016 

,024 

,032 

,240 

, 1 85 

6627 

: 255 

,174 

,060 

,003 

,173 

, 061 

, 1 85 

6633 

: 003 

,032 

,205 

,221 

, 056 

,173 

,155 

6639 

: 060 

,003 

,237 

,092 

,003 

, 1 33 

,255 

6645 

;1 70 

,173 

,061 

,003 

,237 

,093 

,21 4 

6651 

; 00 3 

,005 

,170 

,144 

,01 2 

,173 

,246 

6657 

: 060 

,003 

,141 

,092 

,003 

,173 

,217 

6663 

: 061 

,003 

,141 

,093 

,003 

,162 

,214 

6669 

: 008 

,160 

,01 6 

,024 

,032 

,240 

,237 

6675 

: 2 55 

,174 

,092 

,003 

,173 

,093 

,041 

6681 

: 003 

,032 

,205 

,221 

,096 

,169 

,239 

6687 

: 206 

, 1 33 

,167 

,169 

,031 

,133 

, 1 02 

6693 

: 168 

,173 

,141 

,002 

,208 

,251 

,21 2 

6699 

: 1 69 

,228 

,133 

, 1 70 

,169 

,031 

,175 

6705 

sì 33 

,171 

,169 

,228 

,133 

,180 

,039 

671 1 

: 1 69 

,151 

,133 

,181 

,162 

,021 

,104 

671 7 

: 1 60 

,021 

,177 

,167 

,208 

,012 

,038 

672 3 

: 072 

,169 

,032 

,145 

,167 

,104 

,244 

6729 

; 1 45 

,170 

, 1 69 

,000 

,145 

,180 

,114 

6735 

: 1 36 

,01 6 

,237 

,056 

,165 

,167 

,088 

6741 

: 233 

,022 

,133 

,167 

,165 

, 1 68 

,205 

6747 

: 2 33 

,000 

,133 

,168 

,056 

,165 

,078 

6753 

: 1 70 

,233 

,022 

,133 

,170 

,165 

, 222 

6759 

: 1 71 

,233 

,000 

,133 

,171 

,056 

,099 

6765 

: 1 65 

, 1 80 

,233 

,02 2 

,133 

,180 

,254 

6771 

: 1 65 

,181 

,233 

,000 

,133 

,1 81 

,240 

6777 

: 202 

,01 6 

,193 

,096 

,032 

,148 

,040 

6783 

: 224 

, 1 65 

, 1 42 

,162 

,003 

,01 0 

,065 

6789 

: 202 

,208 

,252 

,024 

,1 01 

, 1 42 

,038 

6795 

: 01 0 

,101 

,142 

, 1 05 

, 003 

,133 

,1 21 

6801 

: 1 42 

,074 

,074 

, 056 

,233 

,01 2 

,224 

6807 

: 1 76 

,252 

,105 

,01 5 

,133 

,251 

,059 

681 3 

: 096 

,169 

,128 

,141 

,01 9 

,145 

,087 

681 9 

: 1 69 

,255 

,141 

,034 

,145 

, 1 69 

,052 

6825 

: 1 47 

, 032 

, 21 0 

,255 

, 1 62 

,01 1 

,21 8 

6831 

: 1 60 

,005 

,024 

,032 

,240 

,255 

,123 

6837 

: 1 60 

,000 

, 1 85 

,244 

#01 9 

,032 

,053 

6843 

; 21 0 

,255 

,200 

,192 

,01 2 

,208 

,240 

6849 

: 245 

,169 

,01 4 

,032 

,21 0 

,255 

,094 

6855 

: 1 6 2 

,01 3 

,160 

,005 

, 024 

,032 

,083 

6861 

: 240 

,255 

,160 

, 000 

,185 

,000 

,021 

6867 

: 020 

,032 

,21 0 

,255 

,200 

, 1 92 

,096 

6873 

: 01 2 

,20 8 

,245 

,032 

, 228 

, 255 

, 1 73 

6879 

: 240 

,251 

,201 

,049 

, 144 

,247 

,075 

6885 

: 201 

,054 

,176 

,243 

,056 

,233 

,168 

6891 

: 048 

,073 

,255 

,141 

,063 

,003 

,050 

6897 

: 1 69 

*147 

,032 

,21 0 

,255 

,032 

,062 

6903 

; 202 

,020 

,174 

,063 

,003 

,024 

,221 

6909 

X ì 69 

, 000 

,105 

, 048 

,202 

,208 

,21 7 
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691 5 

: 251 

ri 41 

,082 

,003 

,162 

,003 

,133 

6921 

; 1 60 

,016 

,024 

,032 

,240 

,255 

,224 

6927 

: 1 60 

,000 

,185 

,062 

,020 

,032 

,218 

6933 

; 21 0 

,2 55 

,200 

,192 

,007 

,208 

,069 

6939 

: 2 4 5 

,162 

,006 

,160 

,016 

,024 

,128 

6945 

;032 

,240 

,255 

,160 

,000 

,185 

,137 

6951 

: G 69 

,020 

,032 

,210 

,255 

,200 

,057 

6957 

;1 92 

,01 2 

,208 

,245 

, 1 62 

,010 

,106 

6963 

:ì 60 

,01 6 

,024 

,032 

,240 

,255 

,01 0 

6969 

:1 60 

,000 

,185 

,081 

,020 

,032 

,023 

6975 

: 21 0 

,255 

,200 

,192 

,007 

,208 

,111 

6931 

; 245 

,162 

,01 3 

,160 

,016 

,024 

,177 

6987 

: Q 32 

,240 

,255 

,160 

,000 

,185 

,179 

6993 

s 088 

,020 

,032 

,210 

,255 

,200 

,118 

6999 

: 1 92 

,01 5 

,208 

,245 

,162 

,022 

,163 

7005 

: 1 60 

,001 

,024 

,032 

,240 

,255 

,037 

701 1 

: 1 60 

,000 

,185 

,111 

,020 

,032 

,095 

701 7 

:21 0 

,255 

,200 

,192 

,019 

,208 

,165 

7023 

s 2 4 5 

,169 

,000 

,141 

, 019 

,145 

,062 

7029 

; 1 73 

,01 7 

,145 

,041 

,032 

,208 

,221 

7035 

:249 

,160 

,021 

,169 

,032 

, 1 53 

,139 

7041 

:228 

,031 

,136 

,208 

,248 

,096 

,052 

7047 

: 1 60 

,002 

,162 

,022 

,024 

,032 

,02 5 

7053 

•240 

,2 55 

,160 

,000 

,185 

,01 2 

,225 

7059 

: 02 0 

,032 

,210 

,255 

,200 

,192 

,032 

7065 

: 01 8 

,208 

,24 5 

,032 

,228 

,255 

,115 

7071 

: 240 

,251 

,201 

,089 

,240 

,007 

,163 

7077 

; 201 

,078 

,240 

,006 

,076 

,010 

,008 

7083 

: 01 9 

,076 

,029 

,016 

,000 

,164 

,21 9 

7089 

; 251 

,140 

,074 

,003 

,162 

,001 

,040 

7095 

: 0 2 4 

,032 

,240 

,255 

,160 

,000 

, 1 26 

7101 

; 1 85 

,030 

,020 

, 032 

,21 0 

,255 

t 1 53 

71 07 

; 2 00 

,192 

,017 

, 208 

,245 

,096 

, 1 29 

71 1 3 

1 1 72 

,074 

, 003 

,162 

,001 

,024 

,125 

71 1 9 

: 0 32 

,240 

,255 

,160 

,000 

,185 

,055 

71 25 

: 047 

,020 

,032 

,21 0 

,255 

,200 

,209 

71 31 

:ì 92 

,01 4 

,208 

, 245 

,096 

,160 

,110 

71 37 

:021 

,185 

,228 

,031 

,208 

,028 

, 1 58 

71 43 

: 1 69 

,036 

, 1 53 

, 228 

,031 

,169 

,249 

71 49 

:000 

,153 

,228 

,151 

,072 

,152 

,225 

71 55 

: 0 72 

,032 

, T 82 

,01 9 

,032 

,219 

,031 

71 61 

: 01 9 

, 1 04 

,168 

,104 

,206 

,072 

, 1 54 

7167 

: 0 03 

,076 

,116 

,01 9 

,136 

, 208 

,045 

71 73 

; 220 

,169 

,032 

,153 

,228 

,031 

,070 

71 79 

; 1 62 

, 01 1 

,160 

,016 

,024 

,032 

,160 

7185 

: 2 40 

,255 

,173 

,082 

,003 

,205 

,207 

7191 

: 084 

,003 

f 240 

,01 3 

,160 

,000 

,01 1 

71 97 

: 1 85 

,103 

,020 

,032 

,21 0 

,255 

, 066 

7203 

: 200 

, 1 92 

,008 

,208 

,245 

,173 

,037 

7209 

: 0 82 

,003 

,141 

,084 

,003 

, 056 


721 5 

; 0 73 

,255 

,170 

,169 

,000 

, 032 

,234 

7221 

: 205 

,221 

,162 

,01 5 

,160 

,016 

,064 

72 27 

; 024 

,032 

,240 

,255 

,174 

,072 

,088 

7233 

: 003 

,169 

,000 

,032 

,205 

,221 

,183 

7239 

: 0 96 

,169 

,01 5 

,147 

,014 

,144 

,138 

7245 

: 1 69 

, 1 29 

,141 

,01 3 

,144 

, 1 62 

,067 

7251 

: 01 0 

, 138 

,072 

,032 

,21 9 

,01 9 

,061 

7257 

; 1 04 

,170 

,202 

,20 8 

,246 

, 1 69 

,164 


7263 : 000 ,141 , 01 4 , T 44 , 024 , 1 73 , 079 
7269 : 082 , 003 » 105,01 6,141 , 082,01 8 
7275 : 003 , 096 , 172 , 082 , 003 , 162,11 3 
7281 : 080 , 202 , 208 , 253 , 136 , 192, 160 
7287 : 255 , 208 , 246 , 056 , 173,01 3,046 
7293 : 144 , 233 , 01 2 , 009 , 128 , 141 ,024 
7299 : 01 3 , 1 44 , 096,1 44 , 032 , 032,080 
7305 : 075 , 065 , 066 , 076 , 065 , 077, 049 
731 1 : 032 , 032 , 032 , 076 , 069 , 086, 21 4 
731 7 : 069 , 076 , 032 , 040 , 049 , 045,204 
7323 : 053, 041 , 063 , 080 , 076 , 065,021 
7329 : 089 , 032 , 065 , 071 , 065 , 073,044 
7335 : 078 , 032 , 089 , 032 , 079 , 082, 047 
7341 : 032 , 078 , 063, 031 , 032,1 57,054 
7347 : 01 7 , 094 , 095 , 1 S 7 , 1 57 , 01 7 , 204 
7353 : 033 , 035, 01 7 , 157 , 157 , 144,216 
7359 : 01 7 , 064 , 1 44 , 032 , 1 57 , 017,1 10 
7365 : 032 , 032 , 1 57 , 1 57, 01 7 , 032, 1 1 2 
7371 : 032 , 01 7 , 1 57 , 1 57 , 017 , 028,099 
7377 : 083 , 067 , 079 , 082 , 069 , 144,221 
7383 : 030 , 072 , 073 , 01 7 , 1 57 , 1 57,209 
7389 : 083 , 067 , 079 , 082 , 069 , 1 44,233 
7395 : 1 56 , 083 , 080 , 069 , 069 , 068,240 
7401 : 144 , 066 , 079 , 077 , 066 , 083,236 
7407 : 017 , 157 , 157 , 157 , 157 , 157,017 
741 3 { 076 , 069 , 070 , 084 , 032 , 032,096 
741 9 { 032 , 032,1 57,1 57,1 57 , 157, 175 
7425 { 080 , 082 , 069 , 083 , 083 , 032,174 
7431 { 070 , 073 , 082 , 069 , 032 , 084,1 61 
7437 : 079 , 032 , 083 , 084 , 065 , 082,182 
7443 : 084 , 160 , 000 , 1 85 , 000 , 128,064 
744 9 {1 53 , 000 , 028 , 200 , 208,24 7,093 

74 55 {1 60 , 000,1 85 , 000,1 29 , 153,146 
7461 { 000 , 029 , 200 , 208 , 247 , 160,11 3 
7467 { 007 , 185 , 020 , 021 , 153 , 000,173 
7473 : 028 , 1 36 , 01 6 , 247 , 160 , 039,163 
7479 {1 85 , 028 , 021 , 1 53 , 21 6 , 02 8, 1 74 
7485 :1 36 , 016 , 247 , 160 , 007 , 185,04 4 
7491 : 068 , 021 , 1 53 , 008 , 029 , 136,226 
7497 { 016 , 247 , 160 , 031 , 185 , 076,020 
7503 { 021 , 1 53 , 024 , 029 , 1 36 , 016,202 
7509 { 247 , 1 69 , 255 , 1 41 , 005 , 144,022 
751 5 { 096 , 162 , 021 , 1 69 , 059, 1 33 , 21 9 
7521 { 167 , 169 , 030 , 133 , 168 , 160,156 
7527 { 006 , 169 , 037 , 145 , 167 , 024,139 
7533 { 1 65 , 168 , 105 , 120 , 1 33 , 168,200 
7539 { 1 69 , 002 , 145 , 167 , 056 , 165,051 
7545 { 168 , 233 , 120 , 133 , 168 , 136,055 
7551 { 208 , 231 , 024 , 165 , 167 , 105,003 
7557 ; 022 , 133 , 167 , 165 , 168 , 105, 125 
7563 { 000 , 133 , 168 , 202 , 208 , 213,039 
7569 { 160 , 01 5 , 169 , 038 , 1 53 , 088,000 
7575 { 030 , 136 , 016 , 248 , 160 , 01 5,244 
7581 { 169 , 002 , 153 , 088 , 150 , 136,087 
7587 { 016 , 248 , 096 , 048 , 008 , 008,075 
7593 { 060 , 126 , 126 , 126 , 060 , 255,154 

75 99 { 255,2 55 , 063,031 ,01 5,00 7,033 
7605 { 003 , 255 , 255 , 255 , 255 , 255,179 
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7611 :255, 255, 255, 255,2 55 ,255, 181 
761 7 :252, 248, 240, 224,1 92,01 5,084 
7623 :C1 8,01 6, 01 0 , 005, 060, 064 , 1 1 6 
7629 : 072,240, 072, 008, 080, 1 60,069 
7635 :056, 004, 036,072, 072, 072, 01 1 
7641 : 072 , 1 1 9,064,064,063,036,123 
7647 : 036, 036, 036, 220,004,004,047 
7653 : 248, 200,084, 1 56 , 21 2, 051 , 1 56 
7659 : 043, 048, 035, 238, 238, 238, 051 
7665 : 000, 187,1 87, 187,000,255,033 
7671 : 065, 036, 024, 024, 036, 065, 241 
7677 : 255, 058,01 3,01 3,01 3,210,047 



300 PRINTTAB ( 30 ) " {SU } t [ < 8> } JJ JJJ JJ JJ 

{HOME}" srem 235 

310 PRINT" {HOME} { 5 GIU' } [<?>} LLLLLLLLLLL 
L L LLL L L LL L LLLLL LL LL, " :rem 79 

320 PRINT" (HQME} n TABn3) " Y Z f E ] £@@§@§§0 

[GIU 1 }"SPC(5) "{-) ] Y I C " :rém 124 

330 FOKBV+21,31 :rem 57 

340 PO KE V , 1 2 8 : PO KE V+ 1 r 22$: FOKEV+2 , 20 : POKE 
V+ 3 , 6 9 : POKEV+ 4,30: POKEV+ 5 , 6 9 : rem 141 
350 POKE830 , 1 : POKE 832,255: POKEV+3Q , 0 

: rem 54 

360 SY524573 : rem 157 

370 Al *21 0:A2-30; A3=4Q;A4=21 5:A5*t9Q;FOKE 
V+21 ,26 ; rem 1 00 

380 POKE24 8 38 , 2 : FORQ- T TOT 0 :rem 21 

390 POKEV+8 , INT (RND ( 1 } *A1) +A2 : POKEV+ 9 , INT 
(RND(1}*A1}+A3 srem 184 

400 POKJEV+6,INT(RNDn ) *A4 ) +A2 : POKEV+7 , INT 
( RND ( 1 } *A5) +A3 srem 179 

4Ì0 SYS 24897 : NEXT S rem 27 

420 FORX=VTOV+9:POKEX,Q: NEXT: POKEV+2 1 ,0 

: rem 4 

430 FORICI TO2QQ0 : NEXT : PRINT" {CLR ] " ; POKE53 
272,21 : rem 172 

440 PRINT" {HOME}{ 12 GIU 1 } 11 TAB (15) " GAME O 
VER*' : FORI = 1 T02 000 : NEXT: GOT0 1 60 

:rem 48 

450 REM PAGINA TITOLO ******************** 

:rem 80 

460 V= 53248:3*2040:51 =54272: PRINT" {CLR} 

{ BLU } " s POKE 53280,7 :rem 101 

470 POKEV+39 , 9 : FGKEV+40 ,12: POKEV+4 1 , 0 ; PQK 
EV+ 29 , 2 6 : POKEV+4 3,8: POKEV+42 ,15 

: rem 36 

480 POKES , 2 0 0 : PO KES+ 1 , 202: PGKES+2, 201 :POK 
ES + 4 , 203 ; POKES + 3, 203 srem 67 

490 POKEV+2! ,12: POKEV+2 3 , 8 : PGKESI + 24 , 1 5 

:rem 26 

500 POKEV+4 , 1 60 :POKEV+5 , 50 sPOKESl + 6 , 240 

: r em 20 


Kablam! versione per C64 

100 FORX= 24 57 3T02459 3 : C5=CS+PEEK (X) : NEXT: 

I FCS = 2 90 7THEN 1 6 0 : rem 5 

110 PRINT" {CLR}{ 5' GIU r } STO LEGGENDO:" 

1 : r em 1 92 

120 PRINT" LA ROUTINE L/M" ; : FORX*24 57 3T025 
2 1 9 : READ A : PO KEK , A : B= B+ A : NEXT : r em 32 

T 30 IFB0 72932THEMPRINT" ERRORE NEI DATI! 

" : END S rem 2 29 

140 PRINT" OK" : FRI NT" CARATTERI " : FORX«1 024 
OTO 1 0 5 75 : READA: POKEX , A : NEXT s rem 58 

1 50 PRINT" SPR ITE" :FORX=l 20OOTO1 3056: READA 
: POKEX, A: NEXT : srem 207 

160 POKE53281 ,1 :rem 38 

170 GOTO 4 60: REM VA ALLA PAGINA TITOLO 

: rem 197 

1 80 POKE 5 3272,27; PRINT" {CLR} I < 5> ] {GIU ' 

CHK$ (8) :POKE53280,7 :rem 58 

1 90 PRINTTAB (30) " {RED } {GIU 1 } , 65$58$86$" 


510 FORK = 5 OTO 1 30 : FQKEV+ 5 , K : POKESI +1 ,255-K 
: POKES 1,100: POKES 1+4 ,17: NEXT: rem 1 1 
520 POKES 1 + 1 , 0 : POKESI , 0 : POKESI + 4,0 

:rem 59 

530 POKEV+2! ,8:POKEV+6, 1 53: POKEV+7, 1 22 

:rem 214 

540 POKE24836, 255 : SYS248 97 sOPENl , 0 

;rem 217 

550 PRINT" {CLRH 14 GIU 1 }” :rem 236 

560 PRINT" [GIU r }"TAB (8) " t < S> 1 LIVELLO DIFF 
ICOLTA 1 (1-1 5> { 3 SPAZI} { 3 SIN}"; 

: r em 246 

570 INPUT#! ,SL$ : PRINT: SL=VAL(SL6) :IFSL>1 5 
ORSL<l THEN550 srem 197 

530 POKE53261 r 1 sCLQSEl : SK= ABS ( SL- 1 6 ) * 1 5 + 1 
5 : POKE2 4 83 8 ( SK :rem 217 

590 POKEV+6 , 0 : POKEV+7, 0: POKEV+2 3 , 0 : POKEV+ 
42,B srem 188 

600 GOTO! 80 :rem 104 

610 REM** **DATI LINGUAGGIO MACCHINA****** 


: rem 142 

200 PRINTTAB ( 30) " {SO} # KKKKKKKKK" : rem 69 
21 0 FORX * OTO 1 : PRINTTAB ( 30) " { SU 1 4KKKKKKKKK 
" ; rem 0 

220 PRINTTAB ( 30 ) " { SU } tKKMRVRNKK" : rem 101 
230 PRINTTAB (30) "{SU} #KKX& %&WKK" : rem 241 
240 PRINTTAB [30) "{SU} #KKPTUTOKK"s rem 110 
250 PRINTTAB (30) "{SU} #KKKKKKKKK": rem 74 
260 PRINTTAB { 30) " {SU} tKKMRVRNKK" S rem 105 
270 PRINTTAB ( 30 ) 11 { SU }#KKX£r%6WKK": rem 24 5 
280 PRINTTAB (30) " {SU } # KKPTUTOKK" : r em 114 
290 PRINTTAB (30) " { SU } ♦ KKKKKKKKK" : NEXT 

: rem 199 


:rem 91 

620 DATA 162,0,169,10,157,192,7 :rem 244 
630 DATA 169,0,157,192,219,232,224 

: rem 143 

640 DATA 40,208,241 ,1 20, 1 69,98, 1 41 

srem 139 

650 DATA 21,3,169,66,141,20,3 srem 138 
660 DATA 88,32,149,97,76,168,96 :rem 28 
670 DATA 169,0,170,168,24,109,167 

srem 100 

680 DATA 2,1 44 , 1 ,200,202,208, 247:rem 25 

690 DATA 152,73,255,141 ,0,208,173 

srem 90 
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700 DATA 30,208,41,5,201,5,240 :rem 174 
710 DATA 3,76, 97,96, 1 72,3, 208 :rem 160 
720 DATA 1 40, 5,208, ì 74,2,208,232; rem 30 
730 DATA 232,232,232,232,232,232,232 

;rem 221 

740 DATA 232,232,142,4,208,32,162 

:rem 78 

750 DATA 97, 169,255, 1 41 ,64,3,76 : rem 10 
760 DATA 97,96,165,197,201 ,60,240 

uem 1 06 

770 DATA 3,76,49,234,169,0,141 :rem 204 
780 DATA 24,21 2, 173,1 ,220, 201 ,251 

trem 71 

790 DATA 240,2,208,247,169,15,141 

trem 93 

800 DATA 24,212,76,49,234,165,251 

trem 92 

810 DATA 240,1 8,1 74,2,208,169,1 treni 243 
820 DATA 133,251,232,224,225,240,6 

:rera 127 

830 DATA 1 42,2,208,76, 190,96,1 7 4 : r em 50 
840 DATA 2,208,169,0, 1 33,251 ,202:rem 29 

850 DATA 224,17,240,226,142,2,208 

: rèni 82 

860 DATA 76, 190,96,1 72, 3,208, 1 4 0 ; r em 50 
870 DATA 5,208,1 74,2,208,232,232: rem 38 
880 DATA 232,232,232,232,232,232,232 

trem 227 

890 DATA 232, 142, 4,208, 172, 5, 208; rem 40 
900 DATA 200,192,223,240,12,140,5 

; r em 6 7 

910 DATA 208,32,255,96,32,39,97 trem 7 
920 DATA 76,128,96,120,173,77,4 :rem 4 
930 DATA 240,35,206,77,4,174,4 uem 198 
940 DATA 208, 1 42,8,208, 1 62, 0, 1 42;rem 34 
950 DATA 4,208,172,5,208,140,9 trem 197 

960 DATA 208,32,65,97,169,255,141 

;rom 109 

970 DATA 9,203,1 41 ,64,3,88,76 treni 165 
980 DATA 1 68,96,234,76,43,98,1 73 trem 74 
990 DATA 62,3,141,60,3,169,235 trem 200 
1000 DATA 141,61,3,206,61,3,208 trem 2 23 
1010 DATA 251,206,60,3,208,241,169 

trem 126 

1020 DATA 5,141,62,3,169,64,141 trem 235 

1030 DATA 96,3,206,96,3,173,96 trem 204 

1040 DATA 3,208,245,96,162,32,142 

trem 8 3 

1050 DATA 6,212,174,64,3,202,142: rem 23 
1 060 DATA 64,3,142,1 ,212,162,10 : rem 221 
1070 DATA 1 42,0,2 I 2, 1 62, 1 7,1 42,4*rem 18 

1080 DATA 212,96,32,149,97,169,240 

; rem 152 

1090 DATA 141 ,13, 212, 162,4, 169, 3:rem 32 
HOG DATA 1 41 ,8,21 2,169,100,1 41 ,7 

: rem 69 

IMO DATA 21 2,169,729,1 41 ,11 ,212, 160 

; rem 218 

1120 DATA 15,140,62,3,32,255,96 trem 236 
1130 DATA 169,4,141 ,8,212,169,129 

; rem 90 

1140 DATA 141,11,212,202,208,220,169 

: r em 215 

1150 DATA 5/141,8,212,169,129,141 

trem 83 

7160 DATA 11,212,160,160,140,62,3 

: rem 6 3 

1170 DATA 32,255,96,162,200,142,13 

: r em 129 

USO DATA 21 2,1 69,2,1 41 ,62,3,32 trem 233 
1190 DATA 255,96,202,208,242,32,149 

; rem 193 


1200 

DATA 

37,96,1 62,0,232,169,0 

: rem 

24 4 

1 21 0 

DATA 

157,0,212,224,22,208, 

246 





: rem 

122 

1 220 

DATA 

96,1 73,24,4,201 ,9,240 

: rem 

237 

1230 

DATA 

4,238,24,4,96,173,23 

: rem 

194 

1240 

DATA 

4,201 ,9,240,24,169,0 

: rem 

101 

1250 

DATA 

141 ,24,4,238,23,4,206 

: rem 

232 

1260 

DATA 

6,97,206,6,97,206,6 

: rem 

1 57 

1270 

DATA 

97,206,6,97,206,6,97 

: rem 

216 

1280 

DATA 

36,1 73,22,4,201 ,9,240 

: rem 

241 

1290 

DATA 

1 2,169,0,1 41 ,23,4,141 

; rem 

230 

1 300 

DATA 

24,4,238,22, 4,96,1 73 

; rem 

191 

1310 

DATA 

21 ,4,201 ,9,240, 1 2,1 69 

: rem 

227 

1320 

DATA 

0,141,22,4,141,23,4 

; rem 

1 17 

1330 

DATA 

238,21 ,4,96,173,20,4 

: rem 

1 89 

1340 

DATA 

20! ,9,240,1 5, 1 69,0,1 41 s rem 

24 

1350 

DATA 

21 ,4/8,49,4/141 ,23 

: r em 

B 6 

1360 

DATA 

4,238,20,4,96/] 73/19 

: rem 

199 

1370 

DATA 

4/201 ,9,240,1 5,169,0 

; rem 

185 

1380 

DATA 

1 41 ,20,4,1 41 , 21 ,4,1 41 

: rem 

221 

1390 

DATA 

22/4/238/19,4,96,1 62 

: rem 

202 

1400 

DATA 

0/169,0,157,19,4/232 

: rem 

185 

1410 

DATA 

224,7,208,248,96/120, 

169 





trem 

145 

1420 

DATA 

234,141 ,21 , 3,1 69,49, 141 





t rem 

81 

1430 

DATA 

20/3,88,1 73,21 ,208,41 

: rem 

236 

1440 

DATA 

18,141 ,21 ,208,76/149, 

97 





: rem 

98 

1450 

DATA 

72,1 52,72,1 3B,72/1 73, 

0 : rem 

38 

1460 

DATA 

220,41 ,4,208,1 1 ,173,167 





: rem 

79 

1470 

DATA 

2 , 1 73,1 67,2, 105,4,141 

; rem 

235 

1480 

DATA 

1 67,2,173,0,220,41 ,8 

trem 

187 

1490 

DATA 

2 08,9, 56,1 73, 1 67 , 2 , 2 33 : rem 

49 

1500 

DATA 

4,141 ,167,2/104,170,104 





: rem 

68 

1 51 0 

DATA 

168, 104,76,35, 96, 0,0 

: rem 

193 

1 520 

DATA 

0/2,0,0,0/46/0 

: rem 

1 1 8 

1 530 

DATA 

0/0,0/0,128,0/119 

t r em 

1 7 

1 540 

DATA 

20,255/227 

t rem 

213 


1550 bem*******dati caratteri************ 

: rem 1 42 

1560 DATA 126,102,102,230,230,230,254,0,2 

4.24.24. 56.56.56.56.0. 254 trem 1 52 
1570 DATA 198,6,254,224,224,254,0,254,6,6 

,62, 1 4,1 4,254,0, 1 90/ 19S trem 93 
1580 DATA 198,254, 14, 1 4, 1 4,0,254, 192, 1 92, 
2 54,1 4,206,254,0,254,1 98 : rem 139 

1590 DATA 192,254/230,230,254,0,254,198,1 

2.24.56.56.56.0. 126.102 : rem 76 

1600 DATA 102,254,230,230/254,0,254,198,1 

98,254,14/206,254,0,255 trem 74 

1610 DATA 255,255,255,255,255,255/255,239 
,239,2 39,0, 1 27,1 27,1 27,0 trem 1 SO 

1620 DATA 255/66,36,24,24,36/66,255,255,2 

55.192.192.192.192.192 trem 61 

1630 DATA 192,255,255,3,3,3/3,3,3,3,3,3,3 

,3,3,2 55,2 55, 1 92, 1 92, 1 92 ; rem 108 

1640 DATA 192,192,192,255,255,192,792,192 
,1 92, 192, ’192,1 92,192 trem 225 

1650 DATA 255,255,0,0,0,0,0,0,3,3,3,3,3,3 
,3,3,0,0/0,0,0,0,2 55 : rem 90 

1660 DATA 255,24,24,24/24/24,24/255,255,2 
55/255,24,24,24,24 , 24 trem 233 

1670 DATA 24/3/3,3,255,255,3/3,3,192,192, 

1 92.255.255. 1 92.1 92 trem 1 44 

1680 DATA 192,0,60,102/48/12,102,60,0,0,6 
0,102/96,96,102/60,0 trem 150 

7690 DATA 0,60,102/102,702,102,60,0/0,124 
,102,102,124/102,102,0 trem 20 8 
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Dalla grande 
Wedkola Jackson 

Tutto sull’hobby 
e Home computer 


«xe oxvuret 

La rivista del computer m casa Prove su 
strada* di software e program rat per tutti ì 
personal computer. 

11 numeri all'anno: L 3.500 a numero 
Abbonamento: solo L 31 .500 


UiD€0 

GiOChi 

La guida indiscussa al fantastico mondo dei 
videogame s. La più eccitante, divertente 1 
istruttive rassegna del settore 
11 numeri all’anno: L 3.500 a numero 
Abbonamento: solo L 31*000 

eletator 

Il mensile di elettronica venduto in mezzo 
milione di copie e redatto in 7 lingue. Con 
articoli su: applicazioni, progettazioni, 
sperimentazioni, invenzioni. 

11 numeri all’anno: L- 3-000 a numero 
Abbonamento: solo L 29*000 


MUSKAU 


Il mondo delie 7 note in 
versione ...elettronica. Con test strumentali, 
novità e analisi del mercato s servizi speciali. 
10 numeri all'anno: L 3.000 a numero 
Abbonamento: solo L 24*000 


Quando l'informazione fa testo 

In busta chiusa inviata questo coupon a: s 

| Gruppo Editoriale Jackson via Rosei Irti, 12 - 20124 Mi | 


D Desidero ricevere GRATIS un numero della Rivista 

(allego L 1.000 in francobolli per contributo spese 
di spedizione) 

□ Inviatemi GRATIS i È Catalogo delia 
Biblioteca JACKSON (allego L 1000 
in francobolli per coni riputo spese di 
spedizione) 

Nome — „ — -■ -, — 


Cognome 


CAP . 


Città . 



7 7QO DATA 0,126, 96, Ì20, 96,96, 1 26,0,0, 1 02, 

102.1 26,102,102,102,0,0 :rent 23 

1710 DATA 126,24,24,24,24, 126,0,0,0,0,0,0 

,0, 0,0,0,24,24,0,0, 24 : rem 143 

1720 DATA 24,0,102,102,102,102,0,0,0,0,22 
0,222,220,216,220,222 :rem 155 

1730 DATA 220,21 6,255,255,0, 255,255,1 19,3 

4 . 0. 24. 24 .24.255.255 ;rem 182 

1740 DATA 24,24,24,0,0,0,255,255,0,0,0,25 

5.255.1 92,223,222,220 : rem 197 

1750 DATA 216,216,0,96,96,96,96,96,124,0, 

0, 1 02,1 0 2, 1 0 2,10 2,60, 24, 0 : rem 7 59 

1760 *******DATI SPRITE*** * ************** 

: r em 2 2 5 

1770 DATA 0,0, 0,0, 0,0, 3, 723,7,3, 192, 15, 3, 

255.255.3.255.255.1 ;rem 9B 

1780 DATA 255,254,1,255,254,0,255,252,0,2 

55.252.0. 255.252.0.127 ;rem 22 

1790 DATA 248,0,127,248,0,0,0,0,0,0,0,0,0 

, 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 t rem 1 6 5 

1800 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,128,0 
,4,32,0,1,128,0,3,8,0,6 i rem 212 

1810 DATA 32,0,6,0,0,15, 0,0,15,0,0, 63,192 
, Q r 255, 240, 1 ,255,248,3 : rem 228 

1820 DATA 255,252,3, 255, 252, 3,255,252,3, 2 
55,252,1,255,248,0 : rem 85 

1330 DATA 255,240,0,127,224,0,31,128,0,0, 

127.0. 0.255. 12 8,0, 65 :rem 149 

1840 DATA 0,0,148,128,0,728,128,0,93,0,0, 

34.0. 0.28.0.1.255 : r em 251 

1850 DATA 128,6,8,96,8,0,16,8,201,16,9,0, 

144,8,129,48,4,129 :rem 95 

1360 DATA 32,4,129,32,3,195,192,1,231,128 
,2,195,64,2,0,64,1 : rem 75 

1870 DATA 255,728,0,16,8,8,58,28,92,111,5 
4,24 6,7 95,9 9,227,1 : rem 1 1 5 

1880 DATA 128,0,0,0,0/164,200,] 49,764,168 
, 749,1 70,7 69,93,202 : rem 137 

1890 DATA 201 ,93,206,1 69,21 3, I 70, 1 69,85, 7 
70,169,84, 170,205,85 : rem 218 

1900 DATA 0,0,0,0,0,0,192,236,3,98,187,6, 

55.147.1 76,29,1 ,220 : rem Ili 

1910 DATA 8,0,136,0,0 : rem 247 
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Novità Jackson. 



G. Lovvdoy - C. Micro 

MISURE ELETTRONICHE 
E DIAGNOSI DEI GUASTI 

Un libro che completa l'istruzio 
ne del tecnico elettronico nel 
campo della rilevazione e delle 
eliminazione dei guasti dei cir- 
cuiti elettronici. 

Cod. BiaP Pag 368 Lire 34.500 


rilagliare {o fotocopiare) e spedire in busta chiusa a: 

GRUPPO EDITORIALE JACKSON - Divisione Libri - Vie Rosellina 12 - 20124 Milano 

CEDOLA DI COMMISSIONE LIBRARIA 


VOGLIATE SPEÓFRMi 


Roberto Dorarti 
DATA RASE 
concetti e disegno 

li passato e il presente di un 
software applicativo fondamen- 
tale nell'EDP, per l'utente, il pro- 
grammatore e il responsabile dì 
archivi elettronici. 

Cod. 526P Pag Lire 22.500 


Ù Pagherò contrassegno ai postino ri prezzo Indicalo pio L. 3 000 ptr contributo fisso spese di spadino*». 
Condizioni di pagamento con esecuzione oei cor (riputo di spedizione: 

□ Allego assegno della Banca □ Allego Fotocopia dot versamento spi c/c n. H{sG6203 e voi iole stato 


□ Allogo Fotocopie di versamento su vaglia pastaio 0 voi intesisi e 


Marne e cognome 


8. W. Kermghan, DM Ritchie 
LINGUAGGIO C 
Il testo " ufficiale '' sul linguaggio 
C, scritto da chi t T ha progettato 
e implementato. 

Cod 54TP pag. 216 Lire 21.000 

Matteuzzi. Pelizzardt 
AMBIENTE UNIX 

Un libro che unisce le caratteri- 
stiche di un trattato teorico e di 
un manuale di r iteri mento, con 
una completa trattazione del 
linguaggio C. 

Cod. 54JP Pag. 198 Lire 19.000 

R. Paratone R Viano 

LOGICA E DIAGRAMMI 
A BLOCCHI 

Il primo libro Che affronta in mo- 
do sistematico ed esauriente i 
diagrammi a blocchi, passaggio 
ObblFgato per Chiunque debba 
programmare un elaboratore. 
Cod. 539A Pag. 392 Un 37.000 


Spulo nftrvata alle Aziende Si richiede l'ankU'Diw di Iattura 


Tullio Trincanti 
LA CONTABILITA COL 
PERSONAL COMPUTER 

Diventare protagonisti diretti 
ne ir uh lizzo del computer por le 
proprie esigenze. È l'obiettivo di 
un test che affronta il problema 
dai termini generali fino alle 
specifiche routine di utilità per 
la costruzione di program mige 
sfiorali complessi e all'esame 
di alcuni dei pacchetti più utili 
alle aziende. 
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Rita Bonetti 

Commodore 64 
il basic 

Un'accurata esposizione dei lin- 
guaggio BASIC, accompagnata da 
numerosi esempi. 

Nel Capitolo 1 si ha una panoramica 
dei diversi argomenti. Il Capitolo 2 è 
dedicato al linguaggio. Nel Capitolo 
3 si approfondisce fuso della (astie- 
rà e del video. I) Capitolo 4 fornisce 
le informazioni necessarie per usare 
disco e cassetta per memorizzare 
programmi. 


il Capitolo 5 è dedicato alla stam- 
pante. Nel Capitolo 6 Si parta della 
costruzione del programma. 

Nel Capitolo 7 vengono passati in 
rassegna i codici e i numeri del cal- 
colatore. Il Capitolo B e dedicato alla 
memoria. Nel Capitolo 9 si tratta do- 
gli errori. Completano il libro, l'Ap- 
pendice A dedicata alla tastiera e 
l'Appendice B all’argomento del BA- 
SIC compitato. 

Tutti i programmi esempio riportati 
nel libro sono disponibili a richiesta 
su floppy disk, 
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Commodore 64 
la grafica e il suono 

Ogni argomento viene spiegato e ac- 
compagnato da numerosi esempi 
commentati. Nel libro sono listati 
moltissimi programmi che sono regi- 
strati sulla cassetta allegata. 

Nel Capitolo 1 si tratta del video, del- 
la tastiera e della grafica in modo 
carattere. Il Capitolo n è dedicato al- 
la grafica e ne approfondisce tutti gli 
aspetti. Il Capitolo 3 tratta degli apri- 
te.. Nel Capitolo 4 viene trattato l'ar- 
gomento del suono. Completano il li- 
bro tre appendici: i registri del VI C 11 
e del SID e le frequenze delle note 
musicali, 


Rita Bonetti 

Commodore 64 
i file 

Questo libro tratta in maniera com- 
pleta e precisa la gestione dei file su 
cassetta e su disco. 

Oltre a brevi programmi esempio, ri- 
portati per spiegare l'uso delle istru- 
zioni, il libro contiene cinque pro- 
grammi per creare e gestire un archi- 
vio di dati: SEQUENZIALE su casset- 
ta. SEQUENZIALE su disco, RAN- 
DOM su disco, RANCO Mi 1 USER SU 
disco, RELATIVO $u disco, 
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Ua gioco di alta responsabilità; 
controllato il destino di dieci pa- 
racadutisti, dando II segnale di 
lancio che li fa gettare dall'aereo 
In volo. Il loro buon atterraggio 
dipende dalla vostra abilità nel 
valutare i fattori peso, vento, po- 
sizione e quota dell'aereo, 

uasi tutti abbiamo assistito nella no- 
\^stra vita ad un'esibizione di paraca- 
dutistL e sappiamo quanto questo sport 
richieda tempismo e precisione nei cal- 
coli. Nel gioco d sono tre piattaforme 
di atterraggio di differenti dimensioni: 
la piu piccola è quella che rende di piu 
in termini di punteggi ma è più difficile 
da raggiungere. Mentre nel mare intor- 
no alle piattaforme veleggiano spensie 
rate barchette, voi a bordo dell'aereo 
dovete calcolare attentamente la forza 
del vento (visualizzato come FV m alto 
sullo schermo), il peso de! paracadutista 
(visualizzato come PS), la quota a cut si 
trova i aereo e la sua velocità, prima di 
dare if segnale di lancio premendo un 
tasto qualunque Una volta lanciato il 
paracadutista non sarà più controllabile 
in alcun modo. 

Le tre piattaforme, dalla più grande alla 
più piccola, se raggiunte dal paracaduti 
sta fruttano rispettivamente 25, 50 e 
75 punti Ovviamente, per ciascun ian 
cìq variano le condizioni di vento, peso, 
quota e velocità dell’aereo. Potete inol- 
tre selezionare il livello di gioco deside- 
rato tra due diverse opzioni (Ire nella 
versione per C64), 



Paratrooper versione per VIC 20 

programma 1 


1 0 PQKE52 , 2 7 : PQKE56 , 27 ;CLR: 1-691 2 

: rem ! 62 

15 PRINTHCLRU 3 GIÙ 1 ] { 5 DES J ATTENDERE , 

; rem 180 

20 RE AD A ; IFA=2 56THEN35 : rem 58 

30 CH=CH+A:POKEI f :GOT02D treni 123 

3 5 IFCH021 4 76THENPRIKT w ERRORE NEI DATI": 

END ;rem 222 

4 0 SS=CHRS(U1) :r#m 255 


50 FQRI = lTOLEN(S$) ;FOKE6 30 + 1, ASC (MID5 t$$ , 
1} ) : NEXT : FOKEl 96, I: END : rom 92 

6000 I s 69 1 2 : IFFEEK (1)^1 2 0 TH E N RE TURN 

: r em T 3 3 

6020 READA: IFA=256THENRETURN : rem 24 

6030 PO KE I , A : I = I + 1 ; GOT06 0 2 0 srem 76 

6912 DATA 1 2 0 , 1 6 9 , 1 3, 7 4 > , 20 , 3 , I 69 , 2 7 , 1 4 ì , 
21 * 3 # 86 ; rem 55 

6918 DATA 96,169,1,240,11,206,14,27,169,1 
10,141,15 : rem 162 

6924 DATA 144,76,21,235,173,4,144,208,251 
,169,32,141 trem 11 

6930 DATA 37,145,169,130,141,36,145,238,1 
4,27,169,59 treni 26 


5UPERCOMMGDO&E® 45 


6936 DATA 141, 15, 144,198, 0,208,9,1 60 ,4 4,3 
2,171,27 ; rem 1 1 8 

6942 DATA 165,251,133,0,198,1,208,9,160,8 
8,32,171 nera 121 

6948 DATA 27,165,252,133,1,196,2,208,9,16 
0 , 1 1 0, 32 ! rem 1 1 6 

6954 DATA 171,27,165,253,133,2,206,232,3, 
208,73,173 nem 216 

6960 DATA 233 , 3ì ! 41 , 232 , 3 , 1 72 , 234 , 3, 1 69, 3 
2, 1 53,0 nera 50 

6966 DATA 30,200,153,0,30,206,234,3,16,36 
,169,20 nera 4 8 

6972 DATA 141,234,3,173,20,145,77,24,145, 
74,74,74 nera 126 

6978 DATA 74,74,74,168,185,194,27,141,107 
,27,141,111 : rem 33 

6984 DATA 27,141,160,27,141,166,27,76,168 
,27,172,234 nero 28 

6990 DATA 3,169,2,153,0,30,200,169,3,153, 
0,30 : rem 1 52 

6996 DATA 76,191,234,162,21,185,73,31,133 
,254,185,72 nem 30 

7002 DATA 31,153,73,31,136,202,208,246,16 
5,254,1 53,73 nem 48 

7008 DATA 31,96,0,22,44,66,88,256 


programma 2 


nem 101 


0 PRINT" (CLRj 1 6 GID'H 5 DES ){ BLK } { RVS } 

PARATROOPER" nem 124 

1 PRINT"{ 3 GIU'HrEDH 7 SPAZI } {RVSj (N)O 
VIZIO”: PRINT" { 2 GIU ' } { RED} { 7 SPAZI) 

1 RVS } ( E) SPERTO" nera 176 

2 Bl 5*”{RED}7{GIU’ } {SIN} 5 {SU}" :B2$«" (PUR) 

50{GIU* } { 2 SIN} //{SU} " : B3S»"{WHT}/2/ 
{GIU * } { 3 SIN}/5/{SU}":E$ = "/{GIU' } {SIN} 
/(SU! ”:Q$="{H0ME} { 20 GIU’}” nera 236 

3 GETA$: IFA$="N"THENBl $*B1 S+ES :B2S»B2$+ES 

: B 3 S - B 3 S +ES : GOTO 5 : rem 195 

4 IFASO"E"THEN3 nera 141 

5 PRINT" (CLRl " : FQRA= 3 8 4 00TO38 90 5 : POKEA, 0 : 

NEXT : FORA-30752TO33773 :POKEA, 5 :NEXT :C»3 
07 20 -rem 243 

6 PRINT" {CLR} " : FORA=38400TO38905 : POKEA, 0 : 
NEXT: FORA- 39752T038773 : POKEA, 5 :NEXT:C=3 

0 72 0 nem 244 

7 FORA- 387 96T03 88 1 7:POKEA, 2 : NEXT : FORA» 388 

40TO38861 : POKEA , 7 ;NEXT nera 181 

8 FORA» 1 T09 : READSO ( A) : NEXT: DATA 175,195,2 

07,215,215,207,215,215,0 nem 95 

1 0 POKE36869, 25 5 : FORI = 71 68T0722 3 : RF,ADA: PO 
REI , A: NEXT : rem 133 

1 5 FORA - 75 52T07632 : POKEA, PEEK (A+26624) : NE 
XT : FORA-754 4T075 51 : POKEA, 25 5 : NEXT 

! x era 27 

16 FORA -=742 4 TQ7 4 3 1 : POKEA , 0 : NEXT irci 142 
20 DATA 60,126,126,255,255,255,129,90,90, 

60,24,24,32,36,66,0 nem 134 

25 DATA 14,17,127,255,1,0,0,0,3,7,255,255 
,248,248,120,56 nem 181 

27 DATA 0,1,3,7,8,63,31,15,128,192,224,24 

0,1 76,248 nera 150 

28 DATA 240,224,195,36,24,219,60,24,24,24 

nem 224 

30 POKEl 002, 20:POKE1 001 , 10:SYS691 2 

nem 166 

31 PRINT” { HOME } { 13 GIU‘}{ 2 DES)"B1S" 

{ 6 DES } "B2$ " { 5 DES } " 838 nera 238 

35 PRINT" { HOME} { 16 GIU’HGRN) DE(BLK}":P 
RINT" {GIU’ } (RED} DE":TR-1 0 : SC- 0 : SQ = 799 
6 nera 9 

40 WT»INTIRND<1 ) *1 25+75) : WS- INT (RND ( 1 ) *9 + 

1 ) : POKEl 98 , 0 : POKESQ, 32 :POKESQ+C, 0 

:r ero 16 5 


42 

FOKESQ+2 2 , 32 : POKESQ+C+2 2 , 0 : FORA' 3 87 30T 


038751 : POKEA f 6 : NEXT 

; rem 

147 

45 

POKE251 , 20- WS : PGKE2 52 , 

1 8-WS:POKE0 

,20-W 


S: POKEl , 18-WS 

t rem 

7 

47 

PRINT" { HOME } { 4 GIU'}{BLK}{ 22 SPAZI} 


ir 

: rem 

35 

50 

PRINTQS" {BLK} {RVS}PT{ 

2 DES } ■ "SC" 

[SIN] 


[ 2 SPAZI } ,f :PRINTQS" { 

10 DES} {RVS}UOMI 


NI = “TR" {SIN } 11 

: r em 

40 

51 

PRI NTQ$ " ( GIU 1 } [RVS ] PS { 

2 SPAZI }="WT" 


{SIN} “ : PRINTQS" {RVS} {GIU 1 } { 10 DES } VE 


NTO -"WS" {SIN} " 

: rem 

84 

52 

IFTR=0THEN300 

i rem 

203 

55 

GETAS : 1FAS - " "THEN55 

: rem 

247 

60 

SX-PEEK (1 002) : S Y=PEEK'( 701 9J/22 + 1 :l 

DX^WS 


/2Q : D Y-WT/4 00 

: rem 

1 76 

70 

POKESQ, 32 jpOKESQ+22, 32 

:SP=SX+7680+INT ( 


SY) *22 

; rem 

94 

72 

CL-PEEK (SP+3 074 2 ) ANDl 5 

: CO -PEEK { SP+3072 


0) ANDl 5:IFCLOOORCOOOTHEN90 trem 

171 

75 

POKESP , 0 : POKESP+22 , 1 

:rem 

146 

80 

SX-SX+DX: SY-SY+DY: SQ=SP : FORA» 1 TOl 00:NE 


XT 

: rem 

148 

85 

GOTO 70 

srem 

13 

90 

IFCL = 2 ANDSY< 1 3THENSC-SC+75 ; GOSUB2 00 : GO 


T04(3 

: rem 

103 


1 00 IFCL-1 ANDSYCl 3THENSC-SC+2 5 : GOSUB200 : G 
OTO40 nem 137 

1 1 0 IFCL=4ANDSY< 1 3THENSC-SC+50 :GOSUB200 :G 
OTO40 nero 139 

190 PRINT 1 * { HOME } [ 4 GIU 1 } {BLK} { 2 SPAZI} 

£ RVS } { 4 SPAZ II PECCATO! I { 5 SPA2l}":T 
R=TR- 1 : POKESQ , 6 : FOKÈSQ+C , 1 ; FORV* 1 5TOO 
STEP-1 :rem 14S 

1 95 POKE36877, 210: POKE36878,V: FORTORI TOSO 
: NEXT : NEXT : PO KE 3 6 8 7 7 , 0 * SC“SC - 1 0 ; GQT04 
0 ;rem 148 

200 POKESQ,0:PQKESQ+22, 1 : PRINT" { HOME J 

£ 4 GIU' )l BLK) ( RVS }MISS IONE COMPIUTA 
£ 3 SPAZI) 11 t rem 135 

21 0 POKE36 879 , 1 5 ì F0RA= 1 TQ9 ; PGKE3 6876 , SO (A 
) : FORB-1 TQl 30 : NEXT : NEXT : RETURN 

:rem 251 

300 PRINT" {HOMF,} { 4 GIU 1 } {BLK} { 7 SPAZI} 
f RVS } GAME OVER" : PRINT” {GIU 1 } 

{ 5 SPAZI }{ RVS] ANCORA?" : rem 212 

310 FOKE3 71 66 , 1 27 ; POKE788 , 1 9 1 iPOKB789,234 
: POKE37Ì 66,192 itera 117 

320 GETA$ : I F A$ * " S 11 THENRUN :rem 0 

330 1 F A$ < > " N " THÈ N 3 2 0 itera 90 
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100 PRI NT" {CLR } { S GIU 1 } "TAB (1 3) "ATTENDER 
E PREGO ,». |I :JS = 5632Q :rem 209 

110 FORI = l TOl 01 6 ; READA : CH*CH+A : NEXT I 

: r em 2 37 

120 IFCH0 671 6 3THENPRIHT” ERRORE NEI DATI! 



" : END 

:rem 

45 

130 

RESTORE 

: rem 

184 

1 40 

GOSUB930 

: rem 

177 

1 50 

A$ * " { HOME } ( 

39 SPAZI}" : rem 

143 

160 

SC=0 : TR=1 0 : 

MB= 532 46 : Xp=532 4 8 : YP-XP+1 : 


XA=YF+1 : YA=XA+1 : J5^ 56320 :SD=1 2288 

: rem 173 

170 PR=2 04 0 :EN =53269 :CD- 53278 : CL«) 94;SH*1 
95 : PL=1 93 : PA^T 92 :CR-53287 :5=54272 

;rem 227 

180 GOSUB630 ; GOSUB 3 70 : FORI 15 532 50TO53256ST 
EP2 : POKEI , INT (RND ( 0 ) * 2 S S 1 : NEXT 

:rem 128 

1 90 FORI = YPTOYP+1 4STEP2 : READA : POKEl , A : NEX 

T : r em 4 1 

200 GOSUB690 :rem 177 

210 GOSUB6 50 ; GQSUR53 0 i rem 0 

220 PQKEEN, 254 :POKE53276, 224 ;POKE53258, 35 
: PQKE53 260 , 1 70 ; POKEMB , 32 ; POKE53 2 62 , 50 

: rem 7 

230 REM* ******ini Z IALIZ Z A2 IONE* ********** 

: r em 84 

240 SYS 49360 : rem 155 

250 WS = INT (RND ( 0} * 1 0}+ì ; WT= INT (RND ( 0 ) *225 
) +75 ; GOSUB530 : POKE491 55,1 1 - WS 

;rem 75 

260 POKE491 56 , 1 1 -WS : GETB$ : IFB$ - ""THEN2 60 

: r erri 44 

2 70 rem* * * * * ** *SALTO** * ****************** 

:rem 194 

2 SO D - PEE K (CD } ; POKEMB , {PEEK (MB) J OR ( ( PEE K { 
MB) AND2J/2) :PX«PEEK(XA) : PY-PEEK { YA) +2 
1 :rem 44 

290 POKEXP, PX: POKEYP, PY; POKEEN, 255 :GO$UB8 
80:DX-WS/7:DY-WT/200 ;rem 238 

3 00 POKEXP , PX : POKEYP , P Y ; HT~ INT ( RND { 0 ) * 2 0 } 

+ 170 : rem 40 

310 PY=PY+DY: IFPY>HTTHENGGT0440 :rem 55 
320 PX-PX+DX: IFPX>255THENPX“0 : POKEMB , PEEK 
(MB) ORI : rem 115 

330 IF(PX>80) AND ( ( PEEK (MB ) ANDl ) =1 ) THENPX= 

1 G: POKEYP, Q:PQKEMB, PEEK (MB) AND2 54 

: rem 4 2 

340 TP=PEEK(CD) ; IF (TPANDl ) THEN I F ( TPAND22 4 
) THENIFPEEK ( YP ) 1 41 THEN560 :rem 1! 
350 GOTD300 :rem 100 

360 REM*****LETTURA DATI SPRITE* ******** * 

: rem 1 3 

370 FQRI^SDTOSD+76 7 : READ A : PQKEI , A : NEXT 

;rem 214 

380 POKEPR, PA ì PQKEPR+1 , PL: PQKEPR+2 ,CL; POK 
EPR+3 , SH ; POKEPR+4 , SH :rem 220 

390 IFAS-"N ,, TKEN4l 0 :rem 35 

4 00 POKEPR+5, 1 96 : POKEPR+6 , 1 97 : PQKKPR+7 , 1 9 

8 : r em 5 

410 PGKECR, 1 : PQKECR+ 1,1 1 :POKECR+2, 1 5: POKE 
CR+3 , S : PO KECR+4 , 5 : POKECR+ 5,2: rem 1 97 
420 POKECR + 6 , 7 : POKECR+7 , 3 : RETURN : rem 24 7 
430 REM* * * * * * CATTIVO ATTERRAGGIO********* 

: rem 68 

440 POKEPR, 200: GOSUB850: PRI NTA$"{ HOME} 

{ 10 SPAZ 1 } BERSAGLIO MANCATO! 

{ 3 SPAZI}" : rem 109 

4 50 FORI = 1 TOl 000 : NEXT: PRI NTA$ : POKEEN, 254: 
TR-TR- 1 :SC=SC- 1 0 :rem 85 


4 60 POKEMB, PEEK (MB) AND 2 54 : POKEPR , FA : I FTR= 
0THENGOTO4SQ : rem 159 

470 POKE1 98, 0:GOTO25D !tem 210 

4 80 PRINTA$ : GOSUB5 3 0 : PRI NT : PRINT : PRINT : PR 
INTTABCl 5) "GAME OVER" :rem 36 

490 PRINT : PRIMTTAB ( 7) "PREMI QUALUNQUE TAS 
TO" : POKEl 9B , Q : rem 196 

500 GET B$ : I FB? = " "THÉN 5 0 0 :rem 79 

510 POKEEN , 0 : POKE5 3277 , 0 : PRINT" ( CLR j " : GOS 
UB70 0 ;SC = Q :TR= 1 0 : GGTG2 ! 0 :rem 49 

520 REM* * * * * * V ISUALI ZZA PUNTEGGIO******** 

: r em ! 3 9 

530 PRINT" (HOME} (WHT}{ 2 SPAZ I } PUNTI "SC" 
{SIN} "TAB (13)" HOMI N I "TR " (SIN} *' TAB (2 
3) "FV" WS 11 f SIN 1 n i : rem 227 

540 PRI NTTAB (30) " PS " WT " ( S l N } " : RETURN 

: rem 62 

550 R£M*******BUON ATTERRAGGIO*********** 

: t em 223 

560 PGKE 2040, 1 99 : FORICI TOSOO : NEXTI : GOSUB 
780 :r em 138 

570 FRINTA$ " ( HOME } | 10 SPAZ I } MISS IONE COM 
FIUTA! { 9 SPAZ I ) " ; FORI = 1 TOl 000 : NEXT : P 
RINTA$ : rem 176 

580 IF ( TPAND3 2 ) * 32THENSC=SC+ 2 5 : GOT06 ! 0 

: r em 47 

590 I F (TP ANO 6 4 ) ”64THENSC = SC+ 50 : GOTO 61 0 

: r em 56 

600 IF (TPANDl 28) =1 28THENSC=SC+7 5 : rem ì 43 
610 POKEMB, PEEK (MB) AND2 54: POKEEN, 254 :PQKE 
2040, PA: POKEl 9fl,Q:G0T025G :rem 20 
620 R£m* * * * AZZERA REGISTRI SONORI******** 

t rem 1 32 

630 FORI=STOS+2 4 : POKEl, 0; NEXT: RETURN 

: r em 129 

64 0 rem* * * * *S PONDO DI GIOCO************** 

: rem 99 

6 50 RW-1 584 :CR- 542 72 : FORI ■ RWTORW+39 : POKEC 
R+I, 5: NEXT: PO KE532 80,0: POKE5 3285,0 

: rem 117 

660 B$ = "[<?>] { RVS } { 40 SPAZI}* :rem 47 
670 FOK 1 = 1 TOl 4 : PRI NTB$ ; : NEXT : RETURN 

:rem 62 

680 REM*******TITOLO INIZIALE************ 

:rem 208 

6 90 PRINT n { CLR } n : FORA = OTOl 0 : K E AD L : GOSUB 9 1 
0:NEXT ;rem 69 

700 PRINT"{ 12 Gl U 1 } "TAB ( 1 4 ) " ( CYN } (N)OVIZ 
IO" : PRI NTTAB ( 1 4) "(YEL} (I) NTERMEDIO" 

: rem 154 

710 PRINTTAB (14} "{CRN} (E) SPERTO" : POKE 1 9B, 

72 0 GBTBS: I FB$ * ""THEN720 treni 87 

730 PRINT" (CLR) " ; rem 254 

740 IFB$-"N"THENPQKE53277,224:FGKE2045,20 
I : POKE 2 04 6 , 202 : POKE2 04 7 ,203: RETURN 

:rem 130 

750 IFB$ = n E M THENPOKE2 04 5 ,201 : P0KE204 6 , 202 
: POKE204 7 , 203 : RETURN ; rem 69 

760 POKE2 04 5, 1 96 : POKE204 6 , 1 97 : POKE204 7 , 1 9 


8: RETURN : rem 131 

770 rem 4 ******* *SUONO****** ****** * ******* 

: rem 216 


7B0 PO KES ,97: POKES + 1 , 8 : POKES + 5, 0 : POKK5 + 6, 
24 0 : POKES + 24 , 1 5iPOKES*4 , 33 :rem 28 
790 FORI- 1T075: NEXT :POKES+4, 32 : POKES , 1 43 : 

POKES + 1 ,10: POKES *4,33 : rem 68 

800 FORI a 1 T07 5 : NEXT : PGKES+4 , 32 : POKES+1 , 7 2 
: PGKES+4 , 33 : FORI = 1 T075 : NEXT : rem 30 
8 1 0 POKES + 4 , 32 ; POKES ,195: POKJES+ 1,16: POKES 
+ 4,33: FORI » I TOl 50 : NEXT : POKES+ 4,32 

; rem 32 

820 POKES, 143 :POKES + 1 , 1 2 : POKES + 4 , 33 : FORI - 
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1 TQ75 

t NEXT: POKES+4, 32:POKES, 

1 95 





: rem 

1 99 

830 

POKES+1 , 16;PGKES+4, 33SFORI-] TOl 50 

: NEX 


T : PO KES+ 4 r 3 2 : RETURN 

: rem 

9 

840 

REM* ******* * gpLAS H* ****************** 




: rem 

227 

850 

PGKES 

,0: POKES+] , 64 tPOKES + 5, ì 7;POKE$ + 6 


, 249 : 

POKES + 2 4 , 1 5 

: rem 

1 60 

860 

POKES+4 , 129:EORX-1T01 OOsNEXT 

1 : POKES+4 , 


1 28 t FORI = 1 TO 50 G: NEXT; POKES+1 

, 0 : RETURN 




: rem 

1 97 

870 

REM* ******* *PQQF i******************** 




: rem 

1 54 

880 

POKES 

, Os PQKES+1 ,5tPQKES+5, 1 45;PQKES+6 


,245? 

POKES + 24, 1 5;POKES+4, ì 29 

1 : rem 

1 27 

890 

FORI - 

1 T02 5 : NEXT : POKES + 4,1 28: 

FORI = 

1T02 


00 : NEXT s PQKES+1 , OtRETURN 

rrem 

184 

900 

REM*****CARATTERI T I TOLO* * *********** 




:rera 

235 

91 0 

FGR I = 

1 038 +ATO 1 4 7 8 +ASTEP 4 0 : T= 

1 + 54 272 : P 


OKET, 

1 : POKKT-4 Q , 6 : POKEI , L 

trem 

249 

920 

FOHW" 

ÌTOl OsNEXTWt NEXT! : RETURN 





srem 

247 

930 

I“491 52 

: rem 

39 

940 

READ . 

A : I FA=2 56THENRETURN 

:rem 

237 

950 

PO REI 

, A: 1 = 1 + 1 : GOT09 4 0 

:rem 

248 

960 

DATA 

0,0, 0,0, 0,0 

:rem 

181 

970 

DATA 

0,20,10,86,1,32 

srem 

1 43 

980 

DATA 

ì 73,1 92,173,2,208,56 

: rem 

1 60 

990 

data 

233,1 , 1 44,38, 141 ,2 

: rem 

45 

1000 

DATA 

208,173,16,208,41,2 

: rem 

1 32 

101 0 

DATA 

208,39,1 73,2,208,205 

trem 

188 

102 0 

DATA 

10, 192, 176,31 ,32,196 

:rem 

1 89 

1 030 

DATA 

192,173,9,192,141,2 

;rem 

1 42 

1 040 

DATA 

208,173,1 6, 209,9,2 

; rem 

92 

1050 

DATA 

1 41 ,16,208,76,71 , 1 92 

trem 

196 

1 060 

DATA 

ì 41 ,2,208,173,1 6,208 

: rem 

1 87 

1 070 

DATA 

41 ,253, 141 ,16,208,206 

; rem 

236 

1 080 

DATA 

3, 192,208,94,1 73,4 

; rem 

100 

1090 

DATA 

1 92, 141 ,3, 1 92,169, 2 

: rem 

147 

1100 

DATA 

141 ,0,192,14,0,192 

trem 

75 

11Ì0 

DATA 

1 72,0,1 92, 1 70,169,1 

: rem 

136 

1120 

DATA 

1 0,202, 208, 252, 1 41 ,1 

trem 

169 

1 130 

DATA 

192,1 85,0,208,24,105 

srem 

187 

1 140 

DATA 

1 , 1 53,0,208,1 76,36 

; rem 

87 

1 1 50 

DATA 

173,16,208,45,1 ,192 

: rem 

143 

1 1 60 

DATA 

240,37,185,0,208,205 

trem 

189 

1 1 70 

DATA 

9, 192,1 44,29,32,137 

:rem 

1 57 

1 1 B0 

DATA 

1 92, 1 53,0, 208,1 73, T 

: rem 

ì 39 

1 190 

DATA 

1 92,73,255,45,16,208 

: rem 

205 

1200 

DATA 

141 , 16,208,76,1 59,1 92 

: rem 

248 

1210 

DATA 

173,16,208, 13,1,192 

srem 

1 35 

1 220 

DATA 

141 , 16,208,173,0,1 92 

:rem 

105 

1230 

DATA 

74,168,200,152, 192,5 

: rem 

1 93 

1240 

DATA 

208,170,76,49,234, 169 

treni 

2 

1250 

DATA 

255,141,15,212,169,128 

: rem 

38 

1260 

DATA 

141,18,212,173,27,212 

: rem 

236 

1270 

DATA 

96,32, 1 83, 1 92,41 , 1 5 

: rem 

151 

neo 

DATA 

153,0,208,96,32,183 

: rem 

148 

1290 

DATA 

192,41,40,24,105,50 

trem 

136 

1300 

DATA 

1 41 ,3,208,96,120, 169 

treni 

1 91 

1 31 0 

DATA 

1 1 , 141 ,20,3, 169,1 92 

: rem 

132 

1 320 

DATA 

1 41 ,21 , 3, 88,96,1 20 

: rem 

90 

1 330 

DATA 

169,49,141 ,20,3,169,256 





: rem 

94 

1 340 

REM*' 

******* *PARA* ********** ******* ** 




: rem 

146 

1 350 

DATA 

0, SO, 0,1, 255,128, 7,255 

; rem 

24 

1 360 

DATA 

224,15,255,240,31,255, 

248,63 




: rem 

79 

1 370 

DATA 

255,252,63,255,252,59, 

1 89,220 




;rem 

1 44 


1 380 

DATA 

049,24,140,16,0,0,8, 24 : rem 

31 

1 390 

DATA 

1 6, 4,60, 32, 3, 60, 1 92, 1 : rem 

231 

1 400 

DATA 

153,1 2 8, 0,2 55, 0,0, 60,0: rem 

9 

1 41 0 

DATA 

0,60,0,0,60,0,0,36 treni 

57 

1 420 

DATA 

0,0,36,0,0,1 02,0,2 55 treni 

157 

1 430 

DATA 

0,0, 0,0, 0,0, 0,0 treni 

1 50 

1 440 

DATA 

0,0,0, 0,0, 0,0,0 treni 

1 51 

1 450 

DATA 

0,0, 0,0, 0,0, 0,0 treni 

1 52 

1460 

data 

0,0,0,0,0,3,1,224 treni 

5 

1 470 

DATA 

7,66,16,15,79,255,255,1 27 




trem 

204 

1 4 80 

DATA 

255,255,64,0,0,64,0,0 i rem 

231 

14 90 

DATA 

0,0,0, 0,0, 0,0,0 t rem 

1 56 

t 500 

DATA 

0,0,0,0,0,0,0,190 treni 

2 54 

1 51 0 

DATA 

0,0, 0,0,0, 0,0,0 : rem 

149 

1 520 

DATA 

0,0, 0,0, 0,0, 0,0 : rem 

ì 50 

1 530 

DATA 

0,0,0, 0,0, 0,0,0 ; rem 

1 51 

1 540 

DATA 

0,0, 0,0, 0,0, 0,7 : rem 

1 59 

1550 

DATA 

128,0,15,240,0,31 ,252,0 




srem 

61 

1 560 

DATA 

31 ,254,0,63,255,0,255,255 




: rem 

1 82 

1 5 70 

DATA 

1 ,255,255,7,255,254, 31 ,255 




: rem 

242 

ISSO 

DATA 

248,255,255, 192,0,0,0,0 




; rem 

78 

1 590 

DATA 

0,6,0,0,6,0,0,15 : rem 

223 

1 600 

DATA 

0,0,31,128,0,22,1 28,0 treni 

21 1 

1610 

DATA 

03 8, 1 92, 0 r 38, 64, 0, 1 02, 64 




trem 

1 27 

1620 

DATA 

0,230,96,3,230,96,3,230 




: rem 

74 

1630 

DATA 

96,7,230, 1 12,31 ,246, 11 2,32 




trem 

224 

1640 

DATA 

30,120,1 27,254,252,0,6,1 40 




trem 

21 6 

1 650 

DATA 

0,7, 6,255, 255,255,255,255 




: rem 

1 95 

1660 

DATA 

248, 255,255, 224, 2 55,255, 1 28 

,0 



: rem 

140 

1670 

DATA 

21 ,85,34,26, 1 49, 84, 21 , 149 




: rem 

203 

1 6 B0 

DATA 

84,21 , 149,84, 26,149,34,25 




: rem 

207 

1690 

DATA 

85,84,25,86,164,25,86,84 




: rem 

168 

1 700 

DATA 

26, 1 50, 84,21 , 86,1 64, 21 , 85 




: rem 

188 

1710 

DATA 

1 00,21 ,85, 1 00, 21 ,85,100,21 




treni 

205 

1 720 

DATA 

36,164,21 ,85,84,0,0,0 trem 

237 

1 730 

DATA 

0,0,0, 0,0, 0,0,0 srem 

1 53 

1 740 

DATA 

0,0, 0,0, 0,0, 0, 255 :rem 

6 

1750 

DATA 

5,8 5,80,6,149,80,6,85 trem 

4 

1760 

DATA 

80,6,85,80,6,149,80,5 srem 

0 

1 770 

DATA 

1 49,80,5,1 54, 144, 5, 1 53, 1 44 




srem 

242 

T 780 

DATA 

6,153,144,5,89,144,5,89 




trem 

1 07 

1790 

DATA 

144,5,89,144,5,89,144,5 




trem 

107 

1800 

DATA 

90,144,5,85,80,0,0,0 srem 

1 79 

1 81 0 

DATA 

0,0, 0,0, 0,0, 0,0 : rem 

1 52 

1 B20 

DATA 

0,0,0,0,0,0,0,255 srem 

5 

1830 

DATA 

1 ,85,64, 1 ,165, 64,1 , 101 srem 

28 

1040 

DATA 

64, 1 ,101 ,64,1 , 101 ,64, 1 trem 

16 

1050 

DATA 

101 ,64,1 ,1 01,64,1 ,85,64 




: rem 

77 

1 060 

DATA 

1,90,64,1 ,89,64,1 ,90 trem 

1 99 

1 970 

DATA 

64,1,86,64,1,86,64,1 ; rem 

203 

1 880 

DATA 

90,64,1,85,64,0,0,0 trem 

1 38 

1890 

DATA 

0,0, 0,0,0, 0,0,0 : rem 

1 60 


48 SUPERCOMMODGRE® S/tìtì 



4 


1900 DATA 0,0,0,0,0,0,0,255 ;rem 
1910 DATA 0,0, 0,0,0, 0,0, 0,0, 0,0, 0,0,0 





: rem 

193 

1 920 

DATA 

0,0, 0,0, 0,0,0, 0,0, 0, 

o 

o 

G 

o 





: rem 

I 94 

1930 

DATA 

24,0,1,60,128,1 ,60, 128: rem 

21 

1 940 

DATA 

1,24,128, 1,255,128,0 

,60 





: rem 

76 

1 950 

DATA 

0,0,60,0,0,60,0,0 

: rem 

9 

196 0 

DATA 

36,0,0, 36,0,0,36,0 

;rem 

73 

1 970 

DATA 

0, 102,0,255 

:rem 

2 54 

1 980 

DATA 

0, 0,0,0, 0,0, 0,0 

: rem 

1 60 

1990 

DATA 

0, 0,0,0, 0,0, 0,0 

: rem 

1 61 

2000 

DATA 

0,0, 0/0, 0/0, 0,0 

; rem 

144 

201 0 

DATA 

0,0,0,0,24,0,112,24 

: rem 

97 

2020 

DATA 

14,204,24,51 ,6,24,96 

, 3: rem 

23 


2030 DATA 60,192,1,189,120,112,189,14 

: rem 

2040 DATA 220,255,59,7,126,224,1,255 

:rem 

2050 DATA 1 28,0,255,0,0,1 26,0, 0 : rem 
2060 DATA 5 , 8 5 , 80 , 6 , 1 65 , 80 , 5 , 1 01 : rem 
2070 DATA 80,6,165,80,6,85,80,6 : rem 
2080 DATA 85,80,6, 165,80,5, 65, 80:rem 
2090 DATA 5,90,1 44,5,89,80,5,90 : rem 
2100 DATA 144,5,85,144,5,85,144,5 

:rem 

2110 DATA 90,144,5,85,80,0,0,0 srem 
2120 DATA 0,0,0, 0,0,0, 0,0 ; rem 

2130 DATA 0,0,0,0,0,0,0,255 : rem 

2140 DATA 1,85,64,1,169,64,1 ,149: rem 
2150 DATA 64,1,1 69,64,1,89,64,1 : rem 
2160 DATA 89, 64, 1 , 169,64 , 1 , 85, 64;rem 
2170 DATA 1,106,64,1 f TQ2,64, 1,102 

:rera 

2180 DATA 64, 1 , 102,64, 1 ,102,64,1 :rero 
2190 DATA 1 06,64,1,85,64,0,0,0 : rem 

2200 DATA 0 , 0 , 0 , 0 , 0 , 0 , 0, 0 : rem 

2210 DATA 0,0,0,0,0,0,0,255 :rem 

2220 DATA 0,85,0,0,1 05,0,0,89 :retn 
2230 DATA 0,0,89,0,0,89,0,0 ; rem 

2240 DATA 89,0,0,89,0,0,85,0 :rem 
2250 DATA 0,105,0,0,101,0,0,105 ;rem 
2260 DATA 0,0,89,0,0,89,0,0 : rem 

2270 DATA 105,0,0,85,0 f 0,0,0 :rem 
2280 DATA 0,0,0, 0,0, 0,0,0 :rem 

2290 DATA 0,0,0,0,0,0,0,255 :rem 

2300 DATA 0 , 70 , 80 , 220 , 21 0 f 1 60 , 1 60 , 1 60 

: r em 254 

2310 DATA 16,1,18,1 ,20,18,15,15,16, 5,18 



30 

231 
21 3 
33 
250 
49 
252 

85 

174 

147 

0 

39 

248 

53 

60 

16 

1 79 
146 

2 55 
120 

23 
85 
1 97 
26 
60 
154 
7 



Novità 
firmate 


W/cM Beneffoul 

GIOCHI, TRUCCHI E CONTI 


Ouesio li tire è dalmata soprattut- 
to ai programmatori principianti 
con i suoi 29 program m pr esenta li 
con una ficca do cu menta /tane e 
pronti per essere eseguiti Gir argo- 
menti sono tanti e rispondono alle 
esigenze più disparate II BASIC è 
quello dei calcolatori PE17CBM di 
cui vengono sfrullate a piene le 
molle funzioni. 


flrtà Bonetti 

lucrano Paziuconi - Fabio Bacchi 
Giovami Valerio 


COMMODORE 84 
LA GRAFICA E IL SUONO 


CdiI 5530 Pag 164 Lire U DQU 


Ogni argomento viene spiegato e 
accompagnato da numerosi esem- 
pi commentati. Nel li Oro sono lista- 
ti moltissimi programmi, essps orto 
registrati sulla cassetta allegata 
Inoltre la cassetta contiene anche 
altri programmi, ai quali si la riferi- 
mento nel testo, ma senza listarli 
Ciuf 4090 Pag, 270 Lire. 34.000 
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Cognome 


Va 

Cap Otta Ptqv 

Onta Firma 

Spano riservalo alle Avande Si ricrede l'emissione di iattura ORpfC 

IM.IV* i I 1 I I I I 1 I I II I *"»«» 




dì J. Rhees 

trad ed adatt 

di M. Crisluib Grìz^ì 



Costruite dei muri attorno a] vo- 
stro avversario, cercando di in- 
trappolarlo senza scampo! 

I l muro che costruite può svilupparsi 
ver tic al mente od orizzontalmente, e 
non pud mai venire in con ratto con i 
mun sul bordo delio schermo, con se 
stesso o con t muri costruiti dal vostro 
avversano. Non è nemmeno possibile 
entrare in contatto con eventuali barrie- 
re e ostacoli che possono essere distri- 
buiti casualmente nell’area di costruzio* 
ne. 

Si guadagnano punti cercando di "chiu- 
dere'' ['avversano, tu modo che sia co 
stretto a cozzare contro un altro muro 
o contro se stesso, in questo caso il vin- 
citore guadagna il round ed un numero 
di punii in funzione del tempo di durata 
del round stesso 19 primo giocatore che 
raggiunge i 100 punti vince la partita. 
Le opzioni disponibili neHmizializzazio 
ne de) gioco sono uno o due giocatori, 
utilizzo del joystick o della tastiera, l'ag- 
giunta di ostacoli al campo di gioco e la 
possibilità di variare a proprio gradi- 
mento la velocità del gioco 
Circa il trenta per cento del programma 
è scritto in linguaggio macchina, mentre 
la parte sonora, di temporizzazione e di 
gestione del punteggio è scritta in BA 
SIC. 

Il programma da il meglio dì se stesso 
se giocato da due giocatori, anche se è 
possibile giocare da solì per ottenere un 
buon livello di pratica ed abilità, $i lotta 
contro il tempo, cercando dì sopravvi- 
vere il più a lungo possibile e. se si gioca 
da soli, si dispone di dieci round da su- 
perare con il massimo punteggio possì- 
bile. 


Noie alla versione per Vie 20 

[[ programma per VIC 20, utilizzabile 
sensa espansioni di memoria, è spezza- 
to ìn due parti. Occorre sempre carica- 
re il primo programma, il quale provve- 
dere automaticamente a caricare e 
mandare In esecuzione il secondo. 



Commento alla versione per C64 


linee 

100420 

130 

140-150 

160 

190 


200 


210230 


245 250 
2704S0 
490 510 
520550 
560-660 
6704350 


commento 

chiamano le routine per le opzioni ed inizializzanu Se variabili 

controlla chi sia i! vincitore c passa alla routine di vincita 

disegnano il bordo dello schermo 

se si scelgono le barriere, salta alla relativa routine 

posiziona i giocatori e le direzioni. Le locazioni 251-254 contengono i 

byte bassi ed alti delta posizione di ogni giocatore. Le locazioni 837-838 

contengono le direzioni dei due giocatori 

iniziaUzza il tempo e chiama la routine in linguaggio macchina, che ripassa 
il controllo al BASIC quando si verifica una collisione. Il punteggio è 
determinato da [fam montai e del tempo trascorso 

leggono il valore nella locazione 834 per determinare il numero del 

giocatore entrato in collisione, quindi passano all’ apposita routine per 

aggiornare t] punteggio del vincitore 

provocano il lampeggio in corrispondenza della collisione 

permettono la scelta delle opzioni 

pongono casuaLmenle le barriere sullo schermo 

moralizzano i registri sonori e te variabili 

stampano i punteggi ed | totali, quindi ritornano all’inizio del programma 
inseriscono in memoria la parte in linguaggio macchina 


50 suetftCOWMOOOft^ s as 



Trappola! versione per VIC20 

programma 1 


1 00 1 = 71 6 8 : PR I NT" {CLR} { 5 GIU 1 } 

{ 4 SPAZ I } ATTENDERE . * . " : rem 

110 READ A ; I F A=256 THEN 130 : rem 

120 POKE I, Ai 1 = 1+1 : GOTO 110 : rem 

1 30 SS =CHR? (131) : rem 

1 50 FORI = 1 TOLEN { SS ) : POKE6 3 Ot I f ASC (MI D$ 
, I) ) : NEXT t POKE 198,1 :rem 

160 DATA 32,22,23,32,10,29 ;rem 

170 DATA 173,66,3,240,1,96 ;rem 

190 DATA 32, 1 09, 29, 165, 1 97,208 : rem 

190 DATA 237,76,15,28,169,1 30 : rem 

200 DATA 141,11,144,162,3,181 :rem 

210 DATA 251,157,1 02,3,202,16 : rem 

220 DATA 240,160, 100,169,127,141 ;rem 

230 DATA 34,145,173,32,145,41 ;re m 

240 DATA 128,74,74,74,74,141 i rem 

250 DATA 67,3,169,255,141,34 :rem 

260 DATA 145,173,17,145,74,74 :rem 

270 DATA 41,7,13,67,3,41 :rem 

280 DATA 15,201,15,208,3,173 ;rem 

290 DATA 70,3,141,61,3,141 :rem 

300 DATA 70,3,169,255,141,60 :rem 

310 DATA 3,165,197,205,62,3 :rem 

320 DATA 238,4,162,254,208,33 i rem 

330 DATA 205,63,3,208,4,162 :rem 

340 DATA 253,208,24,205,64,3 i rem 

350 DATA 209,4,162,251,208,15 :rem 

360 DATA 205,65,3,208,4,1 62 : rem 

370 DATA 247,203, 6, 1 73,60,3 :rem 

380 DATA 76,139,28,138,45,60 irei 

390 DATA 3,41,15,201,15,208 :rem 

400 DATA 3,173,69,3,1 41,60 : rem 

410 DATA 3,141,69,3,136,208 :rem 

420 DATA 138,140,11,144,206,71 frem 

430 DATA 3,208,128,173,72,3 : rem 

440 DATA 141,71,3,160,0,1 62 : rem 

450 DATA 0, 1 73, 75, 3, 240, 6 :rem 

460 DATA 1 73, 61 , 3, 1 41 ,60, 3 :rem 

470 DATA 185,60,3,74,176,8 i rem 

490 DATA 1 69,22,32,236,28,76 : rem 

490 DATA 227,28,74,176,8,169 :rem 

500 DATA 22,32,254,28,76,227 :rem 

510 DATA 28,74,1 76,9,169,1 : rem 

520 DATA 32,236,28,76,227,2$ :rem 

S30 DATA 169,1,32,254,29,232 :rei 

540 DATA 232,200,204,68,3,208 : rem 

550 DATA 207,96,141,67,3,18! :rem 

560 DATA 251,56,237,67,3,149 :rem 

570 DATA 251,181 ,252,233,0,1 49 : rem 

580 DATA 252,96,24,117,251,149 :rem 

590 DATA 251,181,252,105,0,149 :rem 

600 DATA 252,96,160,0,1 73,68 : rem 

610 DATA 3,201,1,240,35,165 : rem 

620 DATA 251,197,253,208,29,165 srem 

630 DATA 252,1 97,254,208,23,32 : rem 

640 DATA 1 66, 29, 1 6,9,1 69,1 i rem 

650 DATA 141,66,3,32,120,29 :rem 

660 DATA 96,169,2,141,66,3 :rem 

670 DATA 32,142,29,96,160,0 ì r em 

680 DATA 140,66,3,32,166,29 ìrem 

690 DATA 16,7,32,78,29,32 :rem 

700 DATA 90,29,96,32,90,29 :rem 

710 DATA 32,78,29,96,1 77,251 : rem 

720 DATA 201,32,240,5,169,1 :rem 

730 DATA 141,66,3,96,173,68 :rem 

740 DATA 3,201,1,240,11,177 :rem 

750 DATA 253,201,32,240,5,169 :rem 



760 

DATA 

2,141 ,66,3,96, 32 

: rem 

206 

770 

DATA 

142,29,173,68,3,201 

: rem 

101 

780 

DATA 

2,240,1 ,96,169,219 

: rem 

57 

790 

DATA 

145,253,165,253,24,105 

: rem 

252 

800 

DATA 

0,133,106,165,254,105 

: rem 

1 85 

810 

DATA 

120,1 33, 107,169,6,145 

; r em 

193 

820 

DATA 

106,96,160,0,169,214 

t rem 

148 

830 

data 

145,251 ,165,251 ,24,105 

; rem 

243 

840 

DATA 

0,133,106,165,252,105 

: rem 

187 

850 

DATA 

120,133,107,169,2,145 

: r em 

193 

860 

DATA 

106,96, 173,74,3,10 

: rem 

52 

870 

DATA 

10,56,109,74,3,141 

ì rem 

47 

880 

DATA 

74,3, 96,256 

: rem 

232 


programma 2 


1 00 POKE 5 2 , 28 : POKE 5 6 , 28 * CLR : P0KE3 687 8 , 1 5 : 

GOSUB270 ; GOSUB4 80 ;rem 24 6 

ITOSI = 0 : S 2 = 0 : GOSUB4 3 0 : 1 FFLTKEN 1 0 0 

:iem 27 

120 PRI NT** {CLR }'* :C = 3Q72G : rem 173 

1 30 R* R+ 1 :IFS1 >»1 00OR (S2 >-l OOanDNP - 2 ) OR £ R 
* ! 1 ANDNP = 1 ) THEN 5 4 0 ;tem 2 3 

ì 40 FORA* 77 2 4 TO 7 7 4 5 : POKE A , 1 60 : PO KEA+C , 0 : P 
OKEA+4 40, 1 60 ; PO KEA+ 4 40 +C , 0 : NEXT 

: rem 9 

1 50 FORA* 774 6TG81 4 2STEP22 : POKE A, 160 : POKE A 
+C , 0 ; POKEA+2 1 ,1 60:POKEA+21 +C, Q:NEXT 

i rem 60 

160 IFB$- M S"THENGQSUB51 0 : rem 165 

1 70 IFNP^STHENPRINT 11 (HOME} [RVS) { RED } ROSSO 
"SI" (OFF H 7 SPAZ I }{ RVS } {BLU} BLU" S2 

trem 254 

180 I FHP = 1 THE NP RI NT " { HOME } { RVS } { REO } PUNTI 
,, S2 rt [HQME} M SPC (1 2) M RQUND"R : rem 153 

1 90 POKE2 51 f 22 S:POKe2 52,3G:POKE2 53,23S;PO 

KE2 54 , 30 % PQKB83 7 , 7 : POKE8 3 8 , D 1 

: rem 4 6 

200 TI$-"OOCOOO";SYS71 68 :SC=INT (TI/60) : IF 
NP=1 THENSC=SC*LV :rem 183 

210 0NPEEK (834) GOTO220 , 230 : rem 21! 

220 SF- PEEK {070} +2 56*PEEK {871 ) :GOSUB24G:S 
2 = S2+SC:GOTOl 20 : rem 41 

230 SP=PEEK ( 872 ) +2 56* PEEK ( 873) :GOSUB240:S 
1=S1 +SC: GOTO! 20 irem 44 

240 POKE3 6877, 1 30: FORA* 1T06 :rem 61 

2 50 PO KES P , PEEK ( SP ) - 2 * ( PEEK (SP) ANDl 28) +1 2 

8 : FOR8 55 1 T04 00 : NEXT : POKE36B7 8 , 6-A : NEXT 

: rem 24 

2 60 POKE 36877,0: POKE 36878, 1 5: RETURN 

: rem 87 

270 REM ROUTINE OPZIONI treni 203 

280 P0KE36879,25:PRINT" (CLR) { 5 GIU * ) "TAB 
(7) 11 { RED } TRAPPOLA 1 " : POKE 1 98,0 

; rem 1 0 

290 FRINT 1 ' [ 3 GIU 1 }"TAB{5) " {BLUHRVSJI 

{OFF} UN GIOCATORE" : PRI NT*' { 2 GIU'} M T 
AB (5) " {RVS} 2 {OFF} DUE GIOCATORI " 

i rem 151 

300 PRI NTSPC ( 5 ) 11 { 2 GIU 1 }{ RVS } 3 (OFF } FINE 
11 : rem 235 


6 

150 

226 

47 

(SS 

124 

241 

2 54 

208 

157 

127 

127 

32 

139 

105 

102 

155 

148 

87 

241 

91 

44 

141 

38 

91 

HI 

43 

49 

112 

35 

246 

42 

ì 84 

44 

31 

197 

244 

9 

1 09 

1 21 

97 

8 

1 05 

96 

1 37 

1 04 

Il 0 

1 95 

208 

195 

1 00 

30 

2 

200 

9 

41 

8 

48 

53 

21 5 

9 

115 

35 

61 

31 

143 
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610 T1-T1+S1 :T2-T2+S2:PRINT"{ 2 GIU 1 ) TOT 
:"Tl iPRÌNTSPC ( 1 2) " {SUjTOT :’’T2 

ztem 144 

620 PRINTSPC ( 6) " { 2 GIU 1 } PREMI UN TASTO’ 1 : 



POKE 1 98,0 

:rem 

10 

630 

GETA$ : I FA$ "THEN6 30 

: rem 

85 

640 

ONNPGOTOl 00,110 

: rem 

93 


31 0 GETA$ìIFA$<"l "ORA$> ,r 3"THEN3T 0 

54 

320 IFAS = "3 ,, THENPRINT"{CLR)":END: rem 225 
330 NP=VAL{A$) :PGKE836, NP ;rem 222 

340 01=11 : POKES4 3 , 0 i IFNP- 2THEN380 

:rem 175 

350 print" [ 2 giu 1 } { rvs } j { off Joystick o 
t RVS ) T ì OF F } ASTIERÀ'* : rem 239 

360 GETA$:IFA$="J"TH£NPOKE843, 1 :Dl =7:RETU 
RN : rem 1 1 0 

370 I FA$ < > 11 T " THEN 3 60 irem 104 

380 PRINT'MCLRH 3 GIU * ] CHE TASTO PER SU? 

«AITI 98,1 :A(1) =PEEK(797) :POKEl 98,0 

: rem 7 2 9 

390 PRINT'MGIU' }CHE TASTO PER GIU r ?":WAIT 
7 98, 1 :A(2) =PEEK{1 97) :POKEl 98,0 

:rem 50 

400 PRINT" {GIU* )CHE TASTO PER SIN,?":WAIT 
1 98,1 :A(3) =PEEK ( 1 97 ) :P0KE198, 0 

irem 55 

410 PRINT'MGIU 1 }CHE TASTO PER DES.?":WAIT 
1 98,1 ; A ( 4 ) " PEEK (197) :P0KE198,Q 

trem 43 

42 0 FORA = 1 T04 : POKE8 2 9 + A , A ( A ) : NEXT : RETORN 

: rem 1 3 

430 PRINT" {CLR) { 5 Gl U * > C 3 SPAZ t } VELGCIT 
A 1 ? { 2 SPAZ IH 0-9)" : rem 24 4 

440 PRINT" { 2 GIU 1 } { 2 SPAZILO (C) PER GP 
ZIONI" : rem 125 

4 50 GETA5 : 1 F ( AS < " 0 "GRA$ > " 9 * ) AND A3 < > "C" THE 
N4 50 :rem 207 

4 60 IFAS = "C , *THENFL= 1 :rem 129 

4 70 LV-VAL{A$) ; P-60-LV6 : P0KE8 39, P:POKEB4 
0,P:I.V=LV+1 : RETURN :rem 170 

480 PRINT 1 ’ {CER}{ 4 GIU')VUOT LE BARRIERE? 
* :rem 163 

4 90 GETB$ : I FBS < > " S 11 ANDBS < > 11 N " THEN4 90 

: r em 52 

500 RETURN :rem 117 

SIO FORA = 1 TO 1 5 : rem 53 

520 Q=RND ( 1 ) *430+7746: IFPEEK(Q) O320R(Q>7 
899 ANDQ< 7 922) THEN 5 2 0 : rem 26 

5 3 0 POKEQ ,160: POKEQ+C , 0 : NEXT : RETURN 

:rem 242 

540 IFNP-2THEN58Q :rem 1 

550 PRINT" [ CLR } ( 8 GIU 1 } "3PC ( 7 ) " ( BLU } PUNT 
I : ”52 : rem 166 

560 IFS2>HITHENH1*S2 : rem 0 

570 PRINTSPC ( 8 1 " (GIU* } { RED } MAX . : "H I : GOTO 6 
20 :rem 243 

580 W=- (SI >=1 00) -2* {52>=700} ; PRINT” (CLRf 
{ 5 GIU* }"SPC (5)" {REDlGlOC. "«"VINCE! 
" :rem 234 

590 PRINT" { 2 GIU 1 } (BLU}PT( 2 SPAZI): "Si: 
PRINTSPC (12} "{SU} PT{ 2 SPAZI) :"S2 

:rem 171 

600 WI (W) =WI {W) +1 :PRINT’*{ 2 Gl U 1 } VINCE : *W 
1(1) : P R I NTS PC ( 1 2) " { SU ) VINCE : 11 WI (2) 

:rem 197 



Trappola! versione per C64 

100 CLR : GOSUB 670 : GOSUB 52 0 : GOSUB 54 0 : GOSUB 2 
60 : GOSUB 4 60 : rem 19 

! 10 SI = 0 :S 2 = 0 :GOSUB 47 0 : IFFLTHEN 1 00 

: rem 25 

120 PRINT" {CLR}" :C =54272 :rem 181 

1 30 R-R+i : 1 FS 1 >= 1 00 OR(S 2 >» 100 ANPNP= 2 )OR(R 
:=! 1 ANDNP -1 } THEN 5 60 :rem 25 

140 FORA -1 1 04 TO 1 1 43 :POKEA, 1 60 : PGKEA+C , 0 ; P 
OKEA+ 880, 1 60 : POftEA +88 Q+C , 0 : NEXT 

; rem 253 

1 50 FORACI 1 44TOl 94 4STEP4 0 : POKEA , 1 60 : POKEA 
+C , 0 : POKEA+3 9 , 1 60 : POKEA+3 9 +C , 0 : NEXT 

: rem 6 7 

160 IFB$ = "S "THENGOSUB 4 90 : rem 7 72 

170 IFNP= 2 THENPRINT" { HOME} { 7 SPAZI) {RVS} 
{RED) ROSSO 11 SI " (OFF) f 11 SPAZI ){RVS) 
{BLU) BLU" S 2 : rem 254 

1 80 IFNP = 1 THEN P RI NT" { HOME J "TAB [ 8 } " {RVS} 

[RED ) PUNTI " £ 2 ; S PC ( 8 ) "ROUND" R : rem 246 
1 90 FOKE25Ì , 1 94 : P0KE2 52 , 5 : POKE2 53 , 2 1 4 : POK 
E 2 5 4 , 5 : POKER 3 7,7: POKE 838,1 1 : rem 1 93 

200 TI$ = " 000000": SYS 4 9152 :SC= INT(TI/60) :I 
FNP = 1 THENSC ~ SC * LV * rem 230 

210 ONPEE K (834) GOT02 2 0,230 :rem 21 1 

22 0 SP= PEEK ( B70 ) +2 56* PEEK (871 ) :GQSUB245:S 
2-S2+SC : GOTO! 20 trem 46 

230 SP- PEEK (672) +256* PEEK (873) :GOSUB245:S 
1 =Sl+SC:GOTOl 20 : rem 49 

245 FORA-1 T06 : POKESP , PEEK ( $P) -2* (PEEK(SP) 
AND ì 28 ) + 1 28 : FORB- 1 TO 400 : NEXT : rem 3 

250 NEXT: RETURN : rem 2 40 

260 REM ROUTINE OPZ JQN I * **************** * 

:rem 190 


52 auFEHCOMMOtx>RE:* s/tó 



270 POKE53281 , 1 :PRINT" tCLR} { 5 GIU'} "TAB ( 
1 5) " j RED } TRAPPOLA 1 " : POKEl 98,0 

ire® 244 

2 80 PRINT" { 3 GIU 1 } M TAB (13)" {BLU} {RVS}1 

{OFF j UN GIOCATORE 1 * : PRINT" [ 2 GIU 1 }’ 1 ! 
AB(1 31 * {RVS) 2 (OFF) DUE GIOCATORI" 

: r em 24 4 

2 90 PRI NTS PC ( 1 3 ) 11 { 2 Gl U * ){ RVS j 3 (OFF J FIN 

E" :rem 34 

300 GETA$:IPA$<* , r'ORA$>"3 ,, THEN3QO 

:rein 52 

31 0 lFA$ = "3 N THENPRINT"{CLR} rt iEKD: rem 224 
320 NP=VAL { A$ ) t POKE8 3 6 , NP x PRINT" 

{ 3 GIU 1 } (BLK ) "TAB ( 1 4 ) " { RVS} J {OFF }GY5 
TICK O" : rem 223 

330 PRI NT" {GIU 1 ) " TAB ( 8 ) ** { RVS j T £ OFF ] ASTI ER 
A E JOYSTICK 2" : rem 4 

340 GETA$:IFA$-"J ,, THENRETURN xrem 22 8 

350 IFA$O ,, T"THEN340 xrem 100 

360 PRINT" {CLR} { 3 GIU'H 7 SPAZljCHE TAS 
TO PER SU?": WAITl 98, 1 :A(1 ) =PEEK(1 97) x 
POKEl 98,0 5 re-m 127 

370 PRINT* 1 (GIU 1 J 1 6 SPAZIlCHE TASTO PER G 
IU* ?": WAITl 98, 1 :A( 2) =PEEK{ 1 97) ; POKEl 9 

3.0 :rem 48 

380 PRINT'MGIUM l 7 SPAZIJCHE TASTO PER S 

IN.?"; WAITl 98, 1 : A ( 3 ) -PEEK ( 1 9? ) : POKEl 9 

8.0 xrem 62 

390 PRINT" (GIU* }[ 7 SPAZI }CHE TASTO PER D 

ES » ? '* : WAITl 93,1 ; A ( 4 ) =PEEK ( 1 97 } : POKEl 9 

8,0 : rem 50 

400 FORACI T04 : POKE82 9+A, A ( A) :NEXT: RETURN 

; rem 1 1 

410 PRI NT 1 * f CLR } { 5 GIU 1 ) "SPC ( 11 )" VELOCITA 
* 1 0 — 9 > P " :rem 207 

420 PRI NTS PC 1 7) " { 2 GIU * }0 (C ) PER CAMBIA 
RE LE OPZIONI" : rem 174 

4 30 GETAS : I F ( A$ < 11 0 "ORAS > " 9 " ) AND AS < > "C " THE 
N430 ; rem 203 

440 IFAS = 1 *C" THENFL^ 1 : rem 127 

4 50 LV=VAL{A$) : P*6Q- LV* 6 : POKE8 3 9 , P : POKE84 
0, P:LV*LV+1 : RETURN : rem 168 

460 PRINT" {CLR} "SPC (8) "{ 4 GIU*} VUOI LE B 
ARRIERE?" s rem 84 

4 70 GETB$ : I FB$ <> "S" ANDB3 <> 1T N"TKEN4 70 

xrem 48 

480 RETURN xrem 124 

490 FORA" 1 T03 0 : rem 57 

500 Q = RND { 1 ) *870 + 1 1 04 ; I FPEEK (Q) 0 3 20R (Q> 1 
4 6 3 ANDQ< 1 503) THEN5Q0 : rem 238 

51 0 PGKEQ, 1 60 :POKEQ+C,0: NEXT: RETURN 

: rem 240 

520 REM INIZIALIZZAZ IONE* ** ************** 

: rem 24 

53 0 FORA-54 2 72TO54 2 96:P0KEA, 0 : NEXT : RETURN 

; r em 7 1 

540 POKE 54287, 255: PO KE 54290, 1 29: PO KE 54273 
, 7;POKE54296, ì 5 : POKE54 2 7 7 , 21 :rem 166 
550 POKE54278, 240: RETURN xrem 175 

560 G05UB52 0 x 1 FNP=2THENS0Q xrem 77 

570 PRINT" {CLR }{ 10 GIU ' } "SPC ( 1 5 ) " { BLU } PO 
NTI;"S2 xrem 249 

580 IFS2 >HITHENH I a S2 xrem 2 

590 PRI NTS PC (16) " { GIU 1 } { RED } MAX * t "HI : GOTO 
6 4 0 ; rem 38 

600 W=- (Si >-l 001-2* (S2> e 100) : PRINT'* {CLR} 

{ 6 GIU * } "SPC ( 1 3 J " ( RED } GIOC * "W" VINCE I 
" : rem 35 

610 PRINT" { 2 GIU 1 } ( BLU } [ 4 SPAZI }GlOC. 1 
: "Si xPRINTSPC (25) " {SUjGIGC. 2:"S2 

: rem 99 



620 WI (W) =WI (W) +1 xPRINT*' { 2 GIU 1 3 

{ 4 SPAZI} VINCE f 2 SPAZI} :"WI (1 ) xFRlN 
TSPC {25} "* { SU 1 V I NOE t 2 SPAZ I } ; "WI { 2 ) 

xrem 203 


630 

Tl =Tl +S1 : T2 = T2 +S2 ; PRI NT 11 £ 2 

GIU* ) 



{ 4 SPAZI} TOTALE : "Tl x PRINTSPC { 2 5J 

li 


{SU} TOTALE :"T2 

: rem 

58 

64 0 

PRINTSPC (1 S) " ( 2 GIU') PREMI 

UN TASTO" 


: POKEl 98,0 

: rem 

60 

650 

GETAS 

; IFAS = " "THEN65G 

i rem 

89 

660 

ONNFGQTOl 00,110 

: rem 

95 

670 

1 = 491 52 : I FPEEK ( I ) = 32THENRETURN 





: rem 

97 

680 

PRINT 

"{CLRH 5 GIU* } "SPC 1 1 31 

"ATTENDER 


u Al 

IL * - v 


: rem 

92 

690 

READ 

A : I F A=2 56 THEN RETURN 

: rem 

239 

700 

POKEl 

, A : I = 1 + 1 ; GOT06 90 

: rem 

243 

710 

DATA 

32, 22, 1 92, 32,229, 1 92 

: rem 

145 

720 

DATA 

173,66,3,240,1,96 

: rem 

255 

730 

DATA 

32,72,193,165,197,206 

: rem 

210 

740 

DATA 

237,76,15,192,169,33 

: rem 

162 

750 

DATA 

141 ,4,212,162,3,181 

: rem 

87 

760 

DATA 

251 , 1 57,102, 3,202, 16 

: rem 

137 

770 

DATA 

248,160,100,173,0,220 

: rem 

185 

780 

DATA 

41 ,1 5,201 ,15,208, 3 

t rem 

38 

7 90 

DATA 

1 73,70,3, Ì41 , 61 , 3 

: rem 

251 

800 

DATA 

141 ,70, 3, 173,1 ,220 

; rem 

30 

aio 

DATA 

141 ,60,3, 165, 197,205 

: rem 

146 

82 0 

DATA 

62,3,208,4, 162,254 

; rem 

45 

8 30 

DATA 

208,33,205,63,3,208 

: rem 

94 

840 

DATA 

4,1 62,253,200,24,205 

: rem 

144 

8 50 

DATA 

64, 3, 208,4, 162,251 

x rem 

47 

860 

DATA 

208, 1 5,205,65,3,208 

: rem 

99 

870 

DATA 

4,162,247,208,6,173 

: rem 

106 

sao 

DATA 

60,3,76,111,192, 1 38 

: rem 

1 03 

890 

DATA 

45, 60, 3, 41 , 1 5,201 

x rem 

247 

900 

DATA 

1 5,208,3,1 73,69,3 

xrem 

255 

910 

DATA 

1 41 , 60, 3, 1 41 , 69, 3 

x rem 

247 

92 0 

DATA 

1 36,208, 166, 169,32, 141 

; rem 

253 

9 30 

DATA 

4,212,206,71,3,208 

: rem 

40 

94 D 

DATA 

1 54, 1 73, 72, 3, 1 41 , 71 

x rem 

98 

950 

DATA 

3,160,0,162,0,185 

x rem 

245 

960 

DATA 

60,3,74,176,0,169 

x rem 

1 5 

970 

DATA 

40,32,199,192,76,190 

:rem 

165 

980 

DATA 

192,74,176,8,169,40 

; rem 

120 

990 

DATA 

32,217, 192,76,1 90, 1 92 

: rem 

21 4 

! 000 

■ DATA 

74,176,0,169, 1,32 

; rem 

4 6 

1010 

■ DATA 

199,192,76,190,1 92,169 

: rem 

58 

1 020 

DATA 

1,32,217,1 92,232,232 

x rem 

179 

1 030 

DATA 

200,204,68,3,208,207 

x rem 

182 

1 040 

DATA 

96,141 ,67,3,181 ,251 

; rem 

146 

1 050 

DATA 

56, 237,67, 3, 1 4?, 251 

xrem 

153 

1 060 

DATA 

1 Sì , 252, 233,0,1 49, 252 

xrem 

239 

1070 

DATA 

96,24, 117, 251 , 1 49, 251 

x rem 

250 

1080 

DATA 

181 ,252,105,0,149,252 

xrem 

239 

1 090 

DATA 

96,160,0, 173,68,3 

: rem 

50 

1 1 00 

DATA 

201 , 1 ,, 240, 35, 165,251 

: rem 

1 74 

ino 

DATA 

1 97,253,208,29, 1 65, 252 

: rem 

46 

1 1 20 

DATA 

1 97,254,208,23, 1 73, 27 

xrem 

249 


SOPEHCOM «ODORE* 5, 05 53 




13 2 0 
1330 


1340 
1 3 50 


DATA 

DATA 

DATA 

DATA 


251 , 1 65,251 f 24,105,0 : rem 

133, 106,165,252, 105,212 

: rem 

1 33,107, 1 69,2, 145,106 :rem 
96,256 ;rem 


1 80 

75 

240 

27 


lì 30 

DATA 

212,16,9,169,1,141 

: rem 

87 

1 1 40 

DATA 

66,3, 32,83,193,96 

srem 

55 

1150 

DATA 

169,2,141 ,66,3,32 

irem 

41 

11 60 

DAI A 

105,193,96,160,0,140 

: rem 

188 

1170 

DATA 

66,3,173,27,212,16 

: rem 

94 

USO 

DATA 

7,32,41,193,32,53 

t rem 

43 

1 190 

DATA 

193,96,32,53,193,32 

i rem 

156 

1 200 

DATA 

41 , 1 93, 96, ! 77,251 ,201 

i rem 

244 

1210 

DATA 

32,240,5,169,1,141 

:rem 

81 

1220 

DATA 

66, 3, 96, 1.73, 68, 3 

: rem 

5 

ì 2 3 0 

DATA 

20! ,1,240,11,177,253 

: rem 

177 

12 40 

DATA 

201 ,32,240,5, 1 69,2 

i rem 

82 

1 250 

DATA 

1 41 , 66, 3,96, 32,1 05 

i rem 

93 

1 260 

DATA 

1 93, 173, 68, 3,201 , 2 

;rem 

93 

12 70 

DATA 

240,1, 96,169, 219,145 

: rem 

204 

1 280 

DATA 

253,165,253,24,105,0 

:rem 

189 

1290 

DATA 

1 33,1 06,165,254,1 05, 21 2 





: rem 

82 

UGO 

DATA 

133, 107, 169,6,145, 106 

: rem 

240 

1310 

DATA 

96,160,0,169,214,145 

: rem 

194 




Riviste firmate JACKSON 


MMNAH4MI 

Un aggiornatissima panorami co delle nuove 
tecnologie microeiettronicha a i riforma licHi 
applicale arautamazion* industriale 
il numeri erario L 3) 500 a numero 
AbtJ'O-nsrrvemo solo L 30 500 


l'Elettronica 


UiDCO 

GiOCKi 


La guida indiscussa ai fanlasltco 
videogame*. u ptu «cenarne, 
ii Trulli va rassegna Gei seti ore 
il numen att enne L 3 500 a numero 
AbDonamentc »l« L 31.000 


©leftToriqcj 


Il puniD di riferimento piu qualificato per chi 
voglia aggiornarci su prodotti, applicazioni, 
tecnologie elei croniche, m dalia e allenterei 
li numen all'anno L 3.500 a numero 
ApbonamenlO: Sóla L 31.000 


Quindicinale di politica industriale, 
compone natica, intarmatic» e 
telecomunicazioni per uomini oh marketing, 
responsabili acquisti. manager di tettare 
22 numeri al! 'anno- 1- 2.500 a numero 
Abbonamento solo L 44,000 

MORNWKA 

La 'ivista profestionabe per chi n occupa di 
sistemi' dai rmerocomputer ai mmi a 
superni ini. ai mainframe Con notizia in 
anteprima dati 'America 
il numeri all'anno L 3 500 a numero 
Ahbonamenio. solo L. 31000 


elektor 


it mensile di elettronica venduto in mezzo 
milione di copie e redatto in 7 lingue Con 
articoli su applicazioni, progettazioni. 

Sq*rimer.|ùiipTi| invenzioni 

ti numen «flerno. l 3 000 a numero 
Abbonamento telo L 29.000 


MSKUl 


I mondo delì# 7 nate in 
ver ucr# t -eltromci Con Usi strumentali 
noviiì e «natili de mercato servizi special. 
IO numeri affanna L. 3.000 a numero 
Abbonamento so*0 U 2* 000 


PSiSONflt. 

SOFJWSRE 

Aspetti e problemi del software per personal 
ccmouler. programmi, giochi # sfatami 
operativi. 

11 numeri all'anno L 4.0<H> a numero 
Abbonamento solo L 34.000 


Le Frontiere aperte dalla loie malica, le 
telecomunicazioni professionali m tuli i loro 
sotlosetlori 

10 nume» all'anno L 3.500 b numero 
Abbonamento 1 som L ?fl odo 


PC 


L'unica nvLsta italiana dedicata ai sistemi 
MS-DOS, Personal computer IBM e 
compatibili. 

10 numeri all'anno, L 5 000 a numero 
Abbonamento solo L 40.000 


La rivista del computer in casa 'Prove su 
strada" di software a programmi per tutti i 
personal computer 
ir numeri a ranno. L 3 500 a numero 
AdOemamenlo- solo L. 31.500 


U poma evinta europea di persone! 
Computer, software e accessori Con Ini 
nowta, anai>& dei mercato 
li numeri fld vmD L 5.000 ■ numero 
Abbonamento «io L *3 000 


Personal , 


L'unica rivista indipendente per gli utenti dai 
personal computar Olivetti 
!(} numeri all’anno L. 4.000 a numero 
Abbgnamentu solo L 35 aoo 

Urti il NUOTA 

Li nvista di informatica nulla didattica per *a 
scuoia itali aria 

g numeri eli 'anno, L. 2.000 a numero 
Abbonamento - solo L 15.000 

Quando lìnf orinazione 
fa testo 


In busta chiusa Inviale questo coupon a ; 
Gruppo Editoriale Jackson 
via AoMtHnl. 12 - 20124 MI 

I] Desidero ocevere GRATIS un numero 
della Riviste 

(s&ego L 1000 m francobolli per 
coninbulD spese di spedizione) 

G inviatemi GRATIS il Catalogò della 
Biblioteca JACKSON (allego L i ODO 
m itancoboiii per contributo spese di 
spedizione) 


Cognome 
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dì R. Lowc 

trad ed adatt. 

di H. Cristuib Gfìzzi 


Sarete in grado di fuggire della 
prigione, trovando la chiave che 
apre la porta? 

Per prima cosa dovrete sconfig- 
gere i mostri matematici che vi 
sbarrano la strada, ponendovi 
domande su addizioni, sottrazio- 
ni, moltiplicazioni e divisioni...* 
Un piacevole ed educativo gioco 
di avventura per bambini, in ver- 
sione unica per il VEC 20 con al- 
meno 8 Kbyte di espansione e 
per il C64. 

A l l'inizio di “Prigione Matematica" vi 
viene chiesto il livello di difficoltà; 
i livelli uno o due comportano soltanto 
domande su addizioni e sottrazioni con 
numeri positivi, mentre il livello tre ag- 
giunge anche la moltiplicazione e la divi- 
sione (sempre solo con numeri positivi), 
li livello quattro pone tutti i tipi di do 
mande, sia con numeri positivi che con 
numeri negativi. 

Si incomincia avendo davanti & sé un 
cancello all'esterno di un’antica dimo- 
ra. 

Pei prima cosa c'è una strada per oltre- 
passare il cancello: vi troverete dì fron- 
te alla porta di ingresso, che sarà chiu- 
sa. Se potrete aprirla, sarete in grado 
di entrare nell antica dimora e presto vi 
troverete nella prigione sotterranea. 
Qui comincia l’avventura. 
Vagabondando per la prigione, potrete 
trovare molte chiavi e porte diversa- 
mente colorate: ovviamente, la chiave 
di un colore aprirà soltanto una porta 
dello stesso colore. Una delle tante por 
te incontrate sarà quella che permette 
di uscire dalla prigione matematica, 
provocando II termine del gioco. 

Nella vostra ricerca dell'uscita potrete 
inoltre trovare una mappa: essa può 
tornare molto utile, in quanto, dopo 
averla trovata, sarà sufficiente digitare 
MAPPA per sapere dove vi trovate La 
mappa usa R per rappresentare le stan- 
ze, H per ìe vie di passaggio. M per i 
mostri e * per il punto in cui vi trovate. 

Il gioco riconosce un numero limitato di 
parole 1 verbi sono: 



prendi 

prende un oggetto 

cancello 

inv 

inventario 

porta 

guarda 

descrive il luogo 

biglietto 

apri 

apre una porta 

chiave 

chiudi 

chiude una porta 

lampada 

accendi 

accende una luce 

cartona dal latte 

«pagai 

spegne una luce 

oro 

mappa 

guarda la mappa 

mappa 

il 

a 

va a nord 
va a sud 

Se vi trovate in difficoltà, digitando AL- 

a 

va a est 

GEBRA potrete avere una via d’uscita. 

o 

va a ovest 

Le informazioni circa la prigione sono 

Mentre i 

vocaboli possibili sono; 

contenute nella matrice FL (10.10). che 
viene riempita di stanze, porte e mostri 
nelle linee 1620 1850 Le linee 1620- 
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1640 piazzano a caso i mostri* in rela- 
zicrne al livello scelto inizialmente 
Le linee 1650-1680 piazzano a caso le 
porte nella prigione. Le linee 1690- 
1710 si assicura no che sia aperta una 
via a ciascun mostro* mentre le linee 


1720» 1770 sistemano a caso le porte e 
le chiavi colorate. 

Il gioco funziona sia sul V1C 20 con 
espansione di memoria da almeno 8 
Kbyte che sul C64: la SYS in linea 120 
determina su quale tipo di computer è 


stato caricato il programma ed ini zia li*» 
za la variabile CC in funzione del nume- 
ro dì colonne di schermo Questa infor- 
mazione viene in seguito utilizzata per 
formattare qualsiasi cosa venga visua- 
lizzata sullo schermo. 


Prigione matematica per VIC 20 e C64 

110 DIM CMS (22) ,CM£22) r IMS (5) f IH ( 5) ,GB$U 
3) ,OB£l3) ,DS$(40) ,FL< 10,10) trem 7 57 

120 SYS6551 7 :CC=PEEK (781 ) :rem 773 

130 IFCC=40THKNPOKE53281 ,1 :rem 8 

1 50 GOSUS7QO:GOSUBl620 : rotti 48 

155 PRINT" {CLR} " : rem 255 

160 GOSUB7 90 ;CM ( 2 ) =1 ;CM[5)^1 : FORI = ? éTOl 9 : 

CM ( 1 J = 1 : NEXT: GB { 1 ) =1 : rem 79 

1 70 PR$ =05$ ( ? ) :GO5UB2570;lFGTTHBNPR$=DS$ f 
2) : GOSUB2 570 : rem 188 

ISO IFGT=OTHENPR$=DS$ 1 3 1 : GOSUB257Q 

;zem 41 

1 90 GOSUB2 37 0 : IFPL=2ORPL=5THENGO5UB800:GO 



TOl 90 

! rem 

183 

200 

GGSUB79G :FORI=l QTOI 9:CM( I) 

= 1 : NEXTl 

: :CM 


(22)=! 

: rem 

96 

210 

IFPL-1 6THEN2S0 

: rem 

43 

220 

IFPL> 1 6THENGOTO250 

: rem 

99 

230 

GOTOl 70 

: rem 

102 

240 

PRINT" {CLR}" :PR$=DS$ £4) :GOSUB2 570 




: rem 

255 

250 

GOSUB79Q :FORI=l 4 TOl 9;CM( I) 

: NEXT : 

GOS 


UB231 0:IFPL=7 6THEN280 

: rem 

709 

260 

I FPL=7 5THENPR8^DS$ £4) SGOSUB2570 




: rem 

96 

270 

GOTO 2 50 

; rem 

1 05 

280 

GOSUB790 : PRINT" (CLR) " ;CM £ 1 ) =T :CK £3) =1 


:CM ( 6) =1 :FORI-l 4 TOl 9:CM ( I ) 

= 1 r NEXT 




: tetti 

241 

290 

CM(4) =1 

; rem 

30 

300 

PR$=US$ (5) ; GOSUB2 570 ; I FMB 3 

othenpr$ 

ì-DS 


$ ( 6) : GOSUB2 570 

t rem 

32 

370 

I KMBTHENPR8 -DS$ (7) iCM£7) -1 

: GOSUB257G : 


IFNT^ 1 THENPR$ =DS$ £11) :G0SUB2 570 




: rem 

11 2 

320 

IFFD=0THENPR$=DS$ £8) :NT=1 : 

GOSUB2570 



: r em 

99 

330 

I FFDTHENPR5 =DS$ ( 9 ) : NT* 0 : GOSUS2 570 




: rem 

247 

340 

GOSUB2 31 0 : IFPL=I 5THEN300 

; rem 

767 

350 

I F t PL= 1 8 ) OR ( PL=1 9) THENGOTO300 




: rem 

234 

3 60 

IFPL=1 7THENGOTO! 60 

: rem 

1 04 

370 

IF (PL=16) AND £FD = 0)THEN320 

: rem 

1 53 

380 

I FPL= 1 6 ANDFD = 0 THEN3 2 0 

: rem 

248 

390 

I FPL- 1 6THEN4 50 

: rem 

57 

4 00 

IFPL^1TKENPR3=DS$ (10) :GOSUB2570 




trem 

84 

410 

IF £ PL« 3 ì OR { PL=6 } THENGOSUB900 : G0T034 0 



: rem 

21 2 

41 5 

IFP L= 7 AND NT - 0 THE NR R I NT " NON 

VEDO FOGLI 


QUII* 1 : GO TO 340 

: rem 

191 

420 

IFPLO7THEN340 

: rem 

56 

430 

PR$ = ,, C * E 1 UNA DOMANDA SUL 

FOGLIO." 

:GQ 


SUB2570 

:rem 

246 

435 

GOSUBl 320 : IFWR=1 THENGOTOl 60 :rem 

1 93 

440 

PRS “DS5 (12): GOSUB2 570 : PR$ - 

DSS (1 3} : 

GOS 


UB2 570 : FD = 1 : MB-0 : GOTO 340 

;rem 

57 

450 

GGSUB7 90 : PRINT" {CLR} { 7 GIU 1 ; 




: rem 

9 


4 70 PR$«"U MA BOTOLA SI APRE SOTTO DI TE t 
ED INIZI A SCIVOLARE SU UNA " 

:rem 183 


480 


4 90 
500 


510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 

690 

700 

710 

720 


730 

740 

750 

760 

770 

780 

790 

800 

81 0 

320 

830 

840 

850 

860 


PR$ = PR$ + ° CASCATA , 
NEON CHE DICE : 11 


PASSI UN'INSEGNA AL 
: GOSUB2 570 : PRINT 

:rem 708 

PR$="t 5 SPAZI] 'PRIGIONE MATEMATICA 1 " 
: GOSUB2570 :rem 237 

PRINT: PR$~*' { 7 3 SPAZ I ] 1 LI VELLO "+STR$ 
£ LV) + " 1 " s GOSUB2 570 : PRINT : PRINT 

:rem 200 

PR$ - "PREMI UN TASTO PER CONTINUARE 11 : G 
OSUB2S70 : rem 239 

GETA$:IFA$^ B "TKEN520 zrem 81 

LT” 1 :PX=INT(RND(1) *101+1 : PY= INT ( RND ( 1 
) *7 0J +1 ;FL(PY,PX) =2 :rem 0 

GOSUB7 90 :CM(9) = 1 : FORI = 1 2TOl 9 :CM [ I ) =1 : 
NEXT : CM ( 9 ) ~LT : CM ( 2 2 ) = ì : rem 2 51 

IFFL ( PY , PX) * 2THENPRINT" {CLR} " : PR$ ^DS$ 
£14) ; GOSUB2 570 :rem 193 

IFFL ( PY , PX ) = 1 THENPRINT" {CLR) " : PR$ =DS$ 
£15): G05UB2 570 :rem 194 

IFLT=1THENPR$=DS$ £16) :GOSUB2570 

:rem 102 

GOSUB2310 : rem 227 

IFFL= 9THENGOSUB950 : GOTO 5 80 :rem 156 
IFPL- 1 2THENGOSUB 9 7 0 : GOTO 580 :rem 1 92 
IFPL- 1 3THBNGQSUBÌ 000 : GOTOS80 : rem 227 
tFPL=7 5ANDLO=0THEN550 :rem 70 

IFPL- 7 SANDLO^ITHENGOSUBI Q20;GOTO57G 

; rem T 96 

IFPL-MTHEN580 :rem 51 

IFPL= 22THENGOSUB2470 : GOTOÉ 70 : rem 24 3 

IFPL> 1 5TRENG05U81 560 : IF ( LO-0) OR (WA- 1 ) 
THEN580 :rem 204 

QNZGOSUBl 960 ,1 860,2000 ;rem 204 

GOTQ67Q Stem 116 

END : rem 118 

PRINT” {CLR) { 9 GIU ' } M : IFCC = 4 0THENPRIN 
TTABU 0) ; :GOTO720 stero 1 6 

PRINTTAB(I); ;rem 185 

PRINT" PRIGIONE MATEMATICA { 2 SPAZI) 

" SPRINT" £GlU f } ” : IFCC~ 4 OTHENPRINTTAB { 1 
2) ; ; GOTO? 4 0 ;rem 57 

PRINTTAB (4) ; trem 190 

PRINT : rem 40 

PRINT" { HOME } { 21 GIU 1 } "TAB £ 3 ) ; : PRS = " I 
NSERISCI IL LIVELLO (U5) " :rem 58 
GOSUB2570; PRINTTAB £8) ; : INPUTLV: IFLV<1 
ORLV>5THENGOTO750 stero 75 

FOR 1 ■ 1 TO 2 2 : READCM3 £1) : NEXT : FORI = 1 T05 : 
READ I NS £1) : NEXT :rem 52 

FORI - ì T02 9 : READDS$ (I } ì NEXT s RETURN 

treni 137 

FOR I - 1 TQ2 2 : CM ( I ) = 0 : NEXT I : EFIN(5) - 1 THE 
NCM (20) -1 : RETURN treni 38 

IFPL» 2 AND GT= 1 THENFR$ - " IL CANCELLO E *G 
IA 'APERTO. ":GOSUB2570 : rem 63 

I FPL» 2ÀNDGT- 0THENGT- 1 SPRINT" VA BENE . * 

: rem 48 

I FPL- 5 ANDGT* 0 THENPR3 = " I L CANCELLO E*G 
lA'CHIUSO." :GOSUB2570 siero 67 

IFPL = 5ANDGT=1THENGT=0: PRINT' 1 VA BENE. " 

: rem 53 

RETURN trem 124 

I FPL- 1 ANDFD= 1 THENP R$ = " LA PORTA E 1 Gl A 1 
APERTA. " JGOSUB2570 trem 97 

IFPL-l ANDFD-0THENFD=1 : PRINT" VA BENE." 

: rem 18 
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870 IFPL= 4 ANDFD-OTHENPRS = " LA PORTA E' Gl A 1 
CHIUSA ♦ " : GOSUB 2 570 : rem ì 01 

880 IFPL=4ANDFD*lTHENFD^GtPRINT ,1 VA BENE * 11 

: rem 2 3 

890 RETURN : rem 129 

900 IFPL=3ANDMB=1THENPR$="IL CARTONE DEL 
LATTE E * Gl A * APERTO , 11 : GOSUB2 5 70 

;rem 79 

910 IFPL=3ANDMB=0THENMB=1 :PRINT"VA BENE » " 
: CM ( 7 ) - 1 tre m 218 

920 I F PL= 6 ANDMB = OTHENPR? ="IL CARTONE DEL 
LATTE E ' GIÀ f CHIUSO . " : GGSUB2 570 

:rem 8 3 

930 IFPL=6 ANDMB= 1 THENMB-0 : PRI NT" VA BENE." 

:CM(7)=0 :rem 222 

940 RETURN :rem 125 

950 1F IN ( 1 ) = 1 THENFR$ = h HAI Gl A * LA LAMPADA 
. " :GGSUB2570:R£TURN :rem 65 

960 I FLT = 1 THENLT= Q : I N ( I ) = 1 : PRI NT ° VA BENE. 

":CM[9)=Q:RETURN :rem 2 54 

970 IFIN ( 1 ) =0THENPR$ = "NON HAI LA LAMPADA. 

" : GOSUB2 570 : RETURN :reirt 53 

980 IFLO=OTHENPRINT ,, VA BENE . 11 : LO= 1 : RETURN 

; r aiti ì 1 6 

990 IFLO=lTHENFR$="LA LAMPADA E'GIA'ACCES 
A. ":GOSUB2 570: RETURN : rem 1 

1 00 0 IFLO= 0THENPR3 LA LAMPADA E'GIA'SPEW 
TA,":GOSUB2 570; RETURN :rem 74 

1010 IFLO-1 THENFRINT"VA BENE ♦ 9 ; LO=0 ; RETUR 
N : r em 1 4 9 

1 020 PRI NT" {CLR} M DS$ ( 1 6-FL ( PX t PY) ) 

;rem 39 

1030 EC=PX+1 :DNS= H EST":IFEC=1 ÌTHENGOTOl 05 
0 : rem 9 

1 04 0 IFFL (PY,EC) O0THENGQSUB1 1 20: rem 177 
1 050 WC“PX- 1 : DN$ = "OVEST" : I F WC = OTHENGOTO 1 0 
70 :rem 165 

1060 IFFL(PY,WC) OOTHENGOSUB11 20: rem 197 
1 0 70 NC = PY- 1 : DN$ = "NORD " : I FNC= 0 THE N GOTO 1 0 9 
0 : r em 5 8 

1080 IFFL (NO, PX) OOTHENGQSUBl 1 20: rem 189 
1 0 90 SOPY+1 : DN$ = "SUD" ; IFSC = Il THENGOTOl ì 1 
0 ; r em 4 0 

1100 IFFL(SC,PX) OOTHENGOSUBl 1 20: rem 187 
IMO RETURN ; rem 1 63 

1120 PRINTDNS " E 1 UN PASSAGGIO ATTRAVERSO 
UNA PORTA . " : RETURN : rem 181 

1 1 30 IFGK=0àNDBK=QANDRK~ 0THENPRINT"QUALE 
CHIAVE?": RETURN ; rem 126 

1140 FRI NT" VA BENE * " treni 118 

1150 IFGKTHENGK=G : IN ( 2) =1 : RETURN : rem 242 

1160 IFBKTHENBK=0:IN(3) =1 : RETURN : rem 234 
1170 IFRKTHENRK-O: IN (4) =1 : BD=2 : RETURN 

: r em 59 

1180 RETURN = rem 170 

1190 IFGDOl THENì 2 20 ; rem 132 

1 200 IFIN ( 2} -0THENPR$=DSS (10) ;GOSUB2570 :R 
ETURN : rem 26 

1210 IFIN (2J -1TH£NPR$=DS$ (27) :GOSUB2570 :M 
A= 1 :CM (111=1 :CM ( 1 ) =0 ; RETURN; rem 254 
1 220 IFBDOl THENÌ 2 50 ; rem 1 24 

1 2 30 IFIN (3) =0THENPR$ = DSS (10) :GOSU&2570 :R 
ETURN : rem 30 

1240 IFIN (3) =1THENPR$-DSS (28) :GOSUB2570 :C 
M(8) =1 ; RK= 1 : CM ( 1 ) =0: RETURN treni 232 

1 250 IFRDOl THENÌ 280 treni 146 

1 260 IFIN (4) "QTHENPR$=DS$ (10) :GOSUB2570 :R 
ETURN :rem 34 

1 270 IFIN (4) =1THENPRINT"(CLR} ";PR$-DS$ (29 
) :GOSUB2570 :GOSUB2520 : rem 53 

1 280 RETURN : rem 171 



12 90 G= INT (RND ( 1 ) *LV*1 0) +1 : PRS = "BAI TROVA 

TO "+STR? (G ) +" PEZZI D'ORO*'* 

: r em 14 5 

1300 GOS UB 2 5 7 0 ; GP - GP+G : PR$ = "ORA POSSIEDI 
"+STRS (GP ) +" PEZZI D'ORO*"; GQSUB2570 

tremi 4 6 

1310 CM (10) -0 : RETURN : rem Ì42 

13 20 OP=INT {RND (1 ) *4) +1 : rem 2 54 

1 340 IF ( LV< = 2 ) AND (OP> = 3 ) THENì 3 2 0 : rem 91 

1 350 PRINT"C0S 4 E 1 ...” ; : rem 215 

1360 ONOPGOTOl 370 , 1 400 r 1 430 ,1 460: rem 230 
1 370 X=INT(RND (1 ì * L V *10) :Y=INT(RND(1 ) *LV* 

10) :rem 34 

1 380 IFLV>4THENX=X-INT[RND (1 } *LV*5) :Y=Y-I 
NT ( RND ( 1 ) * LV * 5 ) : rem 168 

1 3 90 Zi =X+Y: PRINTX" + " Y" ?” : INPUTZS : GOSUB 
1510:IFWR=2THEN1 390 ; rem 129 

13 95 RETURN ; rem 17 8 

1 4 00 X- INT ( RND £ 1 ) *LV*1 0) : Y= INT ( RND ( 1 ) *LV* 

10) treni 26 

1 410 IFLV< = 3THENIFY>XTHENT-X: X= Y : Y-T 

: rem 180 


1420 Si =X- Y ; PRINTX" - " Y" ?": INPUTZ$ : GOSUB 



1 51 0 : IFWR-2THEN1 420 

s rem 

121 

1 425 

RETURN 

t rem 

172 

1 430 

X=INT ( RND (1 5 *LV* 5 ) : Y- INT ( RND { 1 ) * 

LV* 5 


) 

: rem 

1 99 

1440 

IFLV> = 4THENX = X- INT ( RND ( 1 ) *LV*2) ; 

Y=Y- 


INT (RND (1 ) *LV*2 } 

; rem 

220 

1 450 

ZI =X*Y: PRINTX" * ,T Y" ? " : INPOTZS :GOSUB 


1 51 0;IFWR-2THEN1 450 

: rem 

1 21 

1 4 55 

RETURN 

i rem 

1 75 

1460 

X= INT ( RND £ 1 ) * L V * 5 ) :Y=INT(RNDO ) * 

LV* 5 


) 

: rem 

202 

1470 

IFLV>=4THENX=X- 1 NT ( RND £ 1 ) * 

LV* 3 ) : 

Y=Y- 


INT (RND ( 1 ) *LV* 3 ) 

: r em 

225 

1 480 

IFY=QTHEN¥= 1 

:rem 

24 

1490 

SI -X/Y: IFZlOINT(Zl ) THENÌ 460 




; rem 

5 

1 50 0 

PRINTX" / ,T Y"? n : INPUTZS 

treni 

66 

1 50 5 

GOSUB 1510;I F WR = 2THEN 1 490 

: rem 

240 

1 506 

RETURN 

:rem 

1 72 

1 51 0 

I FVAL { 2 ? ) < > OTHEN S 2 = VAL ( Z $ ) 

: GOTO! 540 



; rem 

1 53 

1 520 

IFSS<>"0"THENPRS- "RISPONDI 

PRIMA 

. ALL 


A DOMANDA I " t GOSUB2 570 t WR= 2 

: RETURN 



; rem 

61 

1 530 

S2 « VAL ( Z$ ) 

: rem 

68 

1 540 

IFZl = Z 2THENPRI NT" (CLR}GIUST0! 1" : 

WR~ 0 


tRETURN 

; rem 

1 99 


1 550 PRI NT "{ CLR j SBAGLIATO: ! u :WR-1 : RETURN 

: rem 1 1 4 

1560 WA=0t IFLO=OTHENPRS-"DEVO PRIMA ACCEN 
DERE LA LAMPADA 1 , " : GOS UB 2 5 7 0 : GOTO 1 6 1 
0 treni 200 

1 570 C- ABS ( PL= 1 8) - ABS { PL= 1 9) : D = ABS ( PL= 1 7 ) 
- ABS ( PL= 1 6 ) :TX=PX+C:TY=PY+D;rem 121 
1 580 IFTX-1 10RTX-OORTY=1 1 ORT Y=OTHENPRI NT" 
C 1 E 1 UN MURO QUI - " : WA= 1 t GOTO! 61 0 

: r em 94 
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1 590 IFFL (TY, TX) =0THENPRINT M C ' E 'UN MURO Q 
UE.":WA«1 :GQTOl610 ; rem 135 

1600 PX-TXìPY'TY treni 37 

1610 Z«FL(PY,PX) : RETURN : rem 217 

1620 FOR 1 = 1 TO 1 0 : FOR J - 1 TO 1 0 : FL ( I r J ) =0:NEXT 
J : NEXTI trem 22 

1625 NM* INT {RND {1 ) *1 0 ) +LV : I = 1 trem 145 

163 0 X = IMT(RNIU1 ) *1 0)+l : Y= INT ( RND ( 1 ) *10) + 



1 : IFFL (Y rX) = 3THEN1 630 


51 

1640 

FL ( Y ,X) =3 : 1 = 1+1 : 1 F I < -NMTHENl 630 

trem 

127 

1 650 

FOR I ■ 1 TONM * 2 

: rem 

4 

1 660 

X-1NT (RND (1 ) *1 0) +1 : Y= INT (RND ( 1 ) * 

10) + 


l 

srem 

68 

1 670 

IFFL ( Y f X) =3THENl 660 

:rem 

137 

1 630 

FL { Y f X ) tì 0 : NEXTI 

: rem 

190 

1690 

FORI = 1 TOl 0 : FORJ=l TOl 0 

trem 

79 

1700 

IFFL ( I f J) *3THENGOSUBl 780 

trem 

232 

1710 

NEXTJ: NEXTI 

treni 

20 

1 720 

GOSUB 1 8 4 0 : GX =X : GY = Y : I F ( BX* 

XANDBY 

=Y)0 


R(RX-XANDRY=Y)ORFL(Y,X) =0TH£N1 720 

trem 78 

1 73 0 GOSUBl 840;BX=X:BY=Y: IF ( GX=XANDGY=Y ) Q 
R ( RX*XANDRY= Y) ORFL { Y f X) =QTHEN1 730 

:rem 80 

1 740 GOSUBl 040 :Xl =X;Yl -Yt I F ( X2-XANDY2=Y ) O 
R ( X 3 =* XAND Y3 = Y ) ORFL { Y f X ) * 0 THEN 1 740 

treni 200 

1 750 GOSUBl 840 :X2=X: Y2=Y: IF (X 1 -XANOYl =Y)0 
R(X3=XANDY3=Y)QRFL(Y,X) =0THEN1 750 

netti 202 

l 760 GOSUBl 840:X3=X:Y3=Y:IF(X1 -XANDY l = Y) O 
REX2^XANDY2=Y)ORFLtY r X) «0THEN1 760 

trem 204 

1 770 RETURN trem 1 75 

1 7B0 FORK^JTO! 0: GOSUBl 80 0 :NEXTK : FQRK=JTOl 



STEP-1 tGOSUBT 800:NEXTK 

; rem 

124 

1790 

FOKK-ITOl 0; GOSUBl 820 :NEXTK : FORK= ITO) 


STEP-1 ; GOSUBl 82G:NEXTK: 

RETURN 




trem 

153 

1 800 

IFFL(I,K)=0THENFL(I,K)* 

INT (RND (1 ) 

*2) 


+ 1 

trem 

209 

1 810 

RETURN 

: rem 

1 70 

i 820 

IFFL<K, J) =QTHENFL(K, J) * 

INT (RND (1 ) 

*2) 


+ 1 

: rem 

21 3 

1830 

RETURN 

: rem 

172 

1 840 

X- INT ( RND ( 1 ) * 1 0) +1 : Y* INT (RND ( 1 ) *10) + 


1 :TFFL(Y,X) =0THEN1 840 

: r em 

54 

1850 

RETURN 

: rem 

174 

1 860 

GOSUB 7 9 0 : FORI = 1 2TOl 9 :CM ( I ) =1 : NEXT : CM 


(22)*1 

; rem 

62 

1 870 

PRINT 1 ' iCLR}" :PR$=DS$ (16 

-Z) t GOSUB2 570 


: IFLO fi 1 THENGOSUBl 030 

: rem 

56 

1 880 

GOSUB 2 270 iGOSUB2200 

: rem 

1 54 

1 890 

GOSUB 2 31 0 : IFPL- 1 5ANDL0THENG05UB 1 020 : 


GOTOl 880 

: rem 

68 

1 900 

IFPL-20THENGOSUB2850:GOTOl 890 




trem 

87 

1 91 0 

IFPL-1 5ANDLO=OTHEN1 870 

: rem 

115 

1920 

IFPL^l THENGOSUBl 1 90: GOTOl 890 




: rem 

36 

1930 

IFPL= 1 4THEN1 890 

; rem 

155 


1940 I FPL- 11 THENGOSUB2 4 90 : GOTOl 890 

:rem 91 

1950 IFPL-8THENGOSUB11 30; GOTOl 890 

treni 40 

1960 IFPL=22THENGO£UB2470 : RETURN: rem 50 
1 970 IFPL> 1 5 THENGOSUBl 560 : I F t LO-Q ) OR ( WA= 1 
JTHEU1 890 treni 54 

1980 RETURN s rem 178 

2000 GOSUB7 90 : FORICI 0TO1 9:CM( lì -1 ; NEXTI ;C 
M ( 22 ) «ì : rem 1 20 


201 0 PR$-DS$(23) ; GOSUB2570 : PR$=DS$ (24) t GO 
SUB2 570 : GOSUBl 320 : IFWR*OTHENGOT02G5Q 

:rem 132 

2020 GP-Q : PR$ “DS$ (25) :GOSUB2570:FORW-lTO2 
000 : NEXTW i rem 27 

2030 X*INT(RND{1)*10+1) :Y=INT(RND(1) *10) + 
1 SlFFL(Y,X)=0THEN2030 : rem 38 

2040 PX*X:Fy = Y;2;=FL(PY r PX) : RETURN 

:rem 199 

2050 FR$ -DS$ (26) : GO5UB2570 : FL ( PY , PX ) -2 

:rem 207 

2 060 PR§ -DS$ (14) : GQSEJB2 570 ; IFLOTHENGQSUBl 
030 :rem 1 55 

2070 GOSUB2 270 : GOSUB2200 :rem 146 

2080 GOSUB2370 :rem 16 

2090 IFPL- 20THENGOSUB2850 : GQTO2Q80 

treni 80 

21 00 IFPL-1 5ANDLOTHEN GOSUBl 020: GOTO 20 70 

: r em 1 73 

2110 IPPL=1 5ANDLO=OTHEN2060 : rem 100 

2120 IFPL=1 4THEN2080 treni 139 

2130 IFPL*1 1 THEN2 490 : GQTQ2Q80 trem 203 
21 4 0 IFPL*8THENGOSUBl 1 30 :GOTO2 080 

treni 24 

2150 IFFL= 1 THENGOSUBl 1 90 : GÓT02 080 

:rem 24 

2160 IFPL-1 0THENGOSUB1 29O;GOTQ20B0 

trem 74 

2170 1FPL= 22THENGQSUB2 4 70 : RETURN : rem 44 
2180 IFPL>1 5THENGOSUB1 560 : IF { IX>“0) OR {WA^ 1 
JTHEN2080 trem 40 

2190 RETURN trem 172 

2200 IF (XI =PXANDYl = PY) ANDGDO 2THENPR$ -DS$ 

(1 7) : GOSUB2 570 : GD-1 :CM(1) =1 : rem 122 
221 0 IF(X2^PXANDY2=PY) AN0BDO2THENPR$ = DS$ 
( 1 9) : GOSUB2 570 : BD=1 :CM(1) =1 netti 117 
2220 I F ( X 3 = PXAND Y 3 =PY ) ANDRD< > 2 THENPRS -DS $ 
(18) : GOSUB2 570 : RD- 1 :CK(1 ) -1 treni 1 51 
2230 IF (XÌOPXQRYlOPY) ANDGDO2THENGD-0 

treni 209 

2240 IF [ X 2 < > PXGR Y 2 < > PY ) ANDBD 02 THENBD* 0 

treni 202 

2250 IF (X3OPX0RY3OFY) ANDRDO2THENRP = 0 

trem 237 

2260 RETURN : rem 170 

2270 IFBX=PXANDBY=PYANDIN(3) -0THBNPR$=DS$ 

( 21 ) : GOSUB2 570 : BK=1 :CM(B) =1 ; rem 167 
2280 IFGX-PXANDGY=PYANDIN( 2) =0THENPR$=BS$ 

(20) : G0SUB2 570 : GK=1 :CM(8) -1 treni 181 
2290 IFRX=PXANDRY = PYANDIN(4) =0THENPRS =PS$ 

(22) : GOSUB2 570 : RK=1 :CM( 8) =1 treni 21 9 

2300 RETURN trem 165 

2310 INPUTC? : PL-Q : FORI - 1 T022 ; IFCM$ ( I ) -C$T 

HENPL= 1:1*23 : rem 16 

2320 NEXT treni 6 

2330 IFPL i -0THENPRINT M NON PUOI FARE QUESTO 
! " : G0T023Ì 0 : rem 225 

2340 ; rem 173 

2350 T$«MID$ (CS, I, 1 ) t rem 7 

2360 IFASC (T8) =32THENL=I :GOTO2390 

t rem 222 

2370 I F I - LEN ( G § ) THENG0TO2 410 5 rem 167 

2 380 1*1+1 : GOTO2350 trem 53 

2390 N$ =MID$ (C$ , L+ 1 , LEN (C$ ) ) trem 202 

2400 IFCM(PL) -OTHENPRINT"NON VEDO N N$" QU 
1 1 rt S Q0TQ2 31 0 : rem 97 

2410 IFC$ = " I NV" THENGOTO 243 0 trem 92 

2420 RETURN treni 168 

2430 PRINT " HAI CON TE : 11 t rem 31 

2440 FORICI T05 : IFIN (I) =1 THENPRINT "UN/A Ti I 
NS ( t) : rem 1 6 
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2450 

2 4 60 
2470 

2480 

2490 

2500 

251 0 

2520 

2530 

2 54 0 

2550 
2 560 
2570 

2580 

2590 

2600 

261 0 
2620 

2630 

2640 

2650 

2655 

2660 

2665 

2670 

2675 

2680 

2690 

2700 

2710 

2720 


NEXTI : I FGPOQTHENPRI NTGP" PEZZ I D 1 OR 
G„" trem 15 

RETURN :rero 172 

PX*tNT(RND{l ) *1 0) +1 tF¥=INT{RND (1 ) *1 0 
) +1tIFFL( PY, PXJ =DTH£N2470 :rem 118 
Z = FL ( PY t PX> : RETURN :rem 22 3 

I F I N { 5 J = 1 THENPRS = 11 HA I GIÀ* LA MAPPA1 
" ; GOS U B 2 5 7 0 : RETURN :rem 232 

IFMA*GTH£NPRINT"QUALE MAPPA? " : RETURN 

:rem 145 


PR1NT" VA BENE * " t IN ( 5) «1 : MA-0 tCM ( 20 ) = 
1 ì GD = 2 : RETURN 171 

PR$="( 2 GIU*}HA1 TROVATO LA VIA D*U 
SCITA DALLA PRIGIONE MATEMATICA. '* : GO 
SU&2570 :rem 27 

PR$ = 11 { Gl U 1 H 2 SPAZ 1 1 HAI VINTO *'+STR 
$ (GP) + '* PEZZI D'ORO NEL TUO VIAGGIO - 
« ; GOSUB2570 irern 1 63 

PRINT"1GIU'} GIOCHI ANCORA"; : INPUT a 
$ : r em 1 2 6 

I F A$ * 11 5 "THENRUN :rem 184 

END ixein 164 

IFLEN (PR $) < = CCTHENPRI NTPR$ : RETURN 


:rem 238 

T$ = M I D$ { PRS 1 CC 1 1 ) : 1FASC ( T$ ) = 3 2THENI* 
OC : GOT0262C :rem 4 3 

IwCC-1 srem 58 

T$ = MI D$ ( PR$ , tf 1 ) ; IFASC(T$) = 32 theNGOT 
02620 srem 161 

1= I- ! JGOTO2600 trem 49 

A$=MlD5(FR$,I+l,LEN(PR$Ì } :B$=M1DS(PR 
$,} , I - T > tPRINTB? : rem 195 

I FLEN ( A3 ) < =CCTHENPRI NTA6 : RETURN 

srem 41 

PR$* A$ ; GOTO2570 :rem 117 

DATAAPRI PORTA, APRI CANCELLO, APRI CA 
RTONE, CHIUDI PORTA :rem 254 

DATACHIUD1 CANCELLO, CHI UDÌ CARTONE 

iresti 209 

DATAPRENOI FOGLIO , PRENDI CHIAVE, PREN 
DI LAMPADA, PRENDI ORO, PRENDI MAPPA 

r r em 33 

DATAACCE ND I LAMPADA , SPEGNI LAMPADA,! 
NV £ rem 191 

DATAGU ARO A , N , S , E , O , MAPPA , MAP P A , ALGEB 
RA , LAMPADA : rem 2 3 8 

DATACHIAVE VERDE, CHI AVE BLU, CHI AVE R 
OSSA, MAPPA :rem 210 

DATASSI RIVOLTO A NORD. VEDI UN CANGE 
LLQ - i IL CANCELLO E * APERTO. : rem 61 

DATA IL CANCELLO E 'CHIUSO. ,SBI IN UNA 
FITTA FORESTA. : rem 104 

DATASEI DAVANTI AD UNA VECCHIA CASA. 
C*E' UN CARTONE DEL LATTE SULLA PORT 
A* : rem 118 

DATAI L CARTONE E ' CHIUSO. , IL CARTONE 
E * APERTO * y LA PORTA RICHIUSA. 

: rem 1 7B 

DATALA PORTA E' APERTA * , LA PORTA E'C 
HI USA. NON HA! LA CHIAVE GIUSTA. 

:rem 218 


2730 DATAC 1 E 1 UN FOGLIO NEL CARTONE., LA PO 
RTA SI APRE CON UN BANG! J rem 247 
2740 DATAI L FOGLIO SCOMPARE ED IL CARTONE 
Si RICHIUDE. : rem 21 5 

2750 DATASEI IN UNA STANZA FREDDA E UMIDA 
, SEI IN UN LUNGO E STRETTO CORRIDOIO 
. :iem 142 

2760 DATAC* E' QUI UNA LAMPADA SPENTA. ,C* E 
1 QUI UNA PORTA VERDE. irem 122 

2770 DATAC * E 1 QUI UNA PORTA ROSSA. ,CE* Q 
UI UNA PORTA BLU. :rem 59 

2780 DATAC* E' QUI UNA CHIAVE VERDE., CE* 
QUI UNA CHIAVE BLU. treni 126 

2790 DATAC 1 E * QUI UNA CHIAVE ROSSA., PRIMA 
PUOI DARE UN'OCCHIATA AL LUOGO... 

: rem 1 56 

2800 DATASALTA FUORI UN MOSTRO E DICE 1 DE 
VI RISPONDERE A QUESTA DOMANDAI 

: rem 50 

2610 DATA 1 ORA PRENDERÒ * TUTTO IL TUO ORO E 
TI PORTERÒ * VIA! :rem 198 

2920 DATAI L MOSTRO SCOMPARE. 

VEDI DELL'ORO QUII :rem 87 

2830 DATAC* E* UNA MAPPA QUIÌ,C'E* UNA CHI 
AVE ROSSA QUI! : rem ?B 

2840 DATAC E 1 UN FLASH IMPROVVISO E TI TR 
OV1 IN MEZZO AD ALCUNI ALBERI. 

itera 173 

2850 IFIN 15) *0THENPRINT"NGN HAI UNA MAPPA 
!*': RETURN :rem 51 

2860 ^RINT" { CLR J " ; FRI NT :rera 251 

2870 FORI * 1 TOI 0 : TB= 1 : FQR J * 1 TO 1 0 s rem 142 
2880 IF I = PYANDJ - PXTHENFRINTTAB (TB) " ( GRN } * 
" ; : G0TO2 930 : rem 20 

2 890 IFFLUr J> a 3 THEN P R I NTTAB ( TB ) " ( B LK } M" ; 

: GOTO 2 930 :r em 139 

2900 IFFLtI,J) *2THENPR1 NTTAB (TB) "iBLUlR"; 

; GGTO2930 irem 22 

291 0 IFFLU, J| *1 THENPRI NTTAB (TB) "iPURjH"; 

: GOTQ2930 :rem 137 

2920 PRINTTAB(TB) ** (RV$ J (YEL) {OFF)'*; 

: rem 217 

2930 TB=TB + 2tNEXTJt PRI NT SPRINT :N£XTÌ 

: rem 1 67 

2 940 PRlNT"{BLU}"s RETURN ; rem 217 
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Ut 

' • v ^ 


Gianni Giaccaglini 


Vivere 

col Personal Computer 


comprenderlo, adoperarlo, 
subirne 11 fascino e le nevrosi 


Sì In edicola, 
a sole 
v lire 6.000* 


Arrivano i Quaderni Jackson, tanti 
volumi monografici per conoscere bene 
il personal computer e l'informatica. 

Nei quaderni Jackson c'è tutto quello 
che è importante sapere sui computer, la 
programmazione, ì linguaggi, il software, 
le applicazioni e i nuovi sviluppi deN'in- 
formatica. 

Quaderni Jackson: l'informatica a tutti 
i livelli, in una collana aperta, pratica, 
essenziale, aggiornata. 

['informatica tascabile per chi vuole 
saperne di più e compiere così un salto 
di qualità nel mondo di oggi e di domani. 

Ogni mese, 2 volumi. 


Volumi già pubblicati: 

Gianni Giaccogfini 'Vìvere col Personal Computer" 
Paolo Bozzolo "'Dentro e fuori lo scoto lo" 

Enrico Odetti "Ed è subito BASIC VoL I" 

Paolo Copobossi 

e Marco Giacobazzi "A ciascuno »l suo Personal" 


GRUPPO 
J EDITORIALE 
JACKSON 


SAN SANCISCO LONDRA MLANO 



DAI MEMORIA AL TUO VIC-20 



CON QUESTA CARTRIDGE POTRAI 
ESPANDERE LA MEMORIA DEL TUO 
VIC-20 COME VORRAI: 3K-8K-16K 


Progettata e prodotta in Inghil terra dalla Stona chip Electronics 
questa cartuccia, tramite ir semplice posizionamento di micro- 
switeh, ti consente un ampliamento differenziato della RAM: 3K 
o 8K o 16K, secondo quanto richiedevi programma che devi far 
girare, l contatti placcati in oro, assicurano una lunga dura- 
ta a questa cartridge che darà nuova vita al tuo VIC-20, 

Un prezzo introvabile e garanzia per 6 mesi. 


PROGRAMMERS AID CARTRIDGE 



Questa cartuccia aggiunge ben 19 co- 
mandi al tuo VIC-20: renumber, auto- 
line. edit sound, cursor, block, detete 
*«. e altri. E 1 un prodotto della Stone- 
Chip Electronics con 6 mesi di garan- 
zia integrale. 


MODULO DI ESPANSIONE PER VIC-20 



Questo modulo di espansione differenziata, prodotto dai la Stone- 
chip Electronics, ti consente di utilizzare contemporaneamen- 
te (posizionando i microswitch di cui è dotato] da 2 a 4 cart- 
ridges. Aggiunge inoltre alla ROM 4K. Inserendo con l'espan- 
sione Vlxen T6K Rem una espansione standard di 8K si otten- 
gono ben 24 K RAM. E' anche dotato di una prosa per col lega- 
re un ulteriore modulo di espansione Garanzia 6 mesi. 


TRE CARTRIDGES COMMODORE PER 
VIC-20 AL PREZZO DI UNA 

Scegli i tre videogìochi che preferisci a Lire 41*000 + IVA 

Codice 201 : Sargon chess - Omega race - Avenger 
Codice £02: Omega race - Voodoo cesile * Rat race 
Codice 203: Rìde Fort Knox - Avenger - Mole al tank 
Codice 204: Qorf - Omega race - Cosmlc cruncher 


COMPUTER CASSETTE C-20 

Nastri magnetici da venti minuti ad 
altissima affidabilità, specifici per com- 
puter, Nastro PE 619 AGFA, scorri- 
mento su perni in acciaio autolu bri- 
fi canti, assemblate con cinque viti, 
corpo elegantissimo completamente 
trasparente, complete di etichette e 
cartoncino 

INTERFACCIA PER REGISTRATORE 
PER VIC-20 E PER CBM-64 



La Stonechìp Electronics é stata la prima ditta In Europa a rea- 
lizzare l'Interfaccia per utilizzare qualsiasi registratore con ì com- 
puter Commodore. Conlinuamente aggiornata ó di certo una del- 
le più affidabili presenti sul mercato. Garanzia di 6 mesi. 

LIGHT-PEN PER VIC-20 E CBM-64 

La penna ottica e uno dot piu collau- 
dati prodotti della Stone chip Elec- 
tronics. Ha un'ottima stabilità e buo- 
na risoluzione ve rticale/orizz ornale. 

Completa di cassetta programmi. 

Un prezzo conveniente e una garan 
zia di 6 mesi. 

50 FANTASTICI VIDEOGIOCHI 50 
PER VIC-20 O CBM-64 

Registrati su nastro, della software- ho use inglese Cascade Ga- 
mes f ùIJ in verosimile prezzo di sole L. 25*000 + IVA* 

Spedire il presente MODULO D’ORDINE, o fotocopia, in una 
busta chiusa, unendo L 2 600 In francobolli per spese postali 

UN OMAGGIO A CHI ORDINA ALMENO DUE ARTICOLI 

— — — — — - — — -x 

Spelile APCO s.rj, - Gas* Post. 239 -10015 IVREA (TO) 

desidero ricevere quanto da me contrassegnato con X. Pagherò 
direttamente al postino gli importi qui elencati, che sono com- 
prensivi di IVA e d» spese di Imballo e contrassegno. se 


□ Vixen Switchable 16K RAM a L, 95.000 

□ Programmar Aid Cartridge a L. 48.000 

□ Modulo di espansione per VIC-20 a L. 75.000 

□ 3 cartridges Commodore codice a L. 50.000 

□ 12 computer cassette C-20 a L 15 000 

□ Interfaccia per registratore a L 31*000 

□ LigM-Pen per VIC-20 e CBM-64 a L 65.000 

□ 50 videogìochi per □ VIC-20 □ CBM-64 a L 30.000 


□ Non acquisto nulla ma desidero ricevere f Vostri cataloghi 





Nome e Cognomi* 

Vm 

CJtti CAP. 

data Hrma 



di G, Albretht 

trad ed adatt 

di M. Cristuìb Grilli 



Ecco un gioco daH'azìone velo* 
ciisim® e dotato di fcorriatftito 
orizzontale dello schermo pixel 
per pixel Le due versioni per 
VIC 2Q (con almeno 8 Kbyte di 
espansione di memoria) e per 
C64 sono costituite da due cari* 
calori BASIC di linguaggio mac* 
china e richiedono l'uso del joy* 
stick (porta 2 per il C64). 


L a figlia del Califfo di Bagdad. Blon- 
del!. è stata rapita e tocca a voi. 
prodi difensori debordine, andare in 
sua ricerca e procedere al suo salvatag 
gio. La principessa è imprigionata m 
una torre, ed il vostro compito consiste 
nel volare fino ad *;$sa sul vostro tappe 
lo magico, caricare la principessa e tor 
nare indietro con lei fino alla base, Non 
sarà un'impresa facile, poiché il rapito- 
re - un noto genio del male - ha scate 
nato stormi di leggeri, ma potentissimi 
uccellacci pronti a combattervi Questi 
uccellacci sono intelligenti e cercherai 
no di salire sul vostro tappeto volante, 
oltre a lanciare verso di voi lampi di 
energia Tuttavia anche voi siete pro- 
tetti da una buone dose di magia, che 
vi rende immuni dagli attacchi, ma at- 
tenzione! Ogni attacco riuscito da parte 
degli uccellacci provocherà Linde boli* 
mento del vostro invisibile scudo protet- 
tivo, fino a che potrete comare soltanto 
su voi stessi. 

Siete comunque in grado di lanciare a 
vostra volta lampi di energia all'indiriz- 
zo degli uccellacci cercando di abbat- 
terli. 

"Rescue of Blondel J" é un gioco con ca 
rattenstiche di scorrimento orizzontale 
dello schermo pixel per pixel e possibili- 
tà di usufruire di diversi livelli di difficol- 
ta. proporzionali al numero degli uccel- 
lacci fda 1 a 3 nella versione per 064. 
e da 1 a 9 nella versione per VIC 20). 
Una volta iniziato il gioco volerete verso 
la parte destra dello schermo, spingen 
do il joystick in quella direzione; nella 


parte alta dello schermo sono visuali; 
zatì il punteggio, la quantità di magia 
che ancora vi protegge ed i punti di 
bonus che ricevete portando In salvo 
Blonde]]. Guadagnate 10 punti per ogni 
uccellacelo abbattuto, ed il punteggio di 
bonus diminuisce man mano che passa 
il tempo, costringendovi ad agire con ra- 
pidità 

Ricordate che il Califfo vi ha ordinato 
di ritornare con la principessa, così, se 
cercate dì rientrare alla base senza di 


lei. potreste avere una spiacevole sor- 
presa 

Come detto, la versione per VIC 20 
richiede ] espansione di memoria da ah 
meno 8 Kbyte e richiede di riconfigura- 
re la memoria prima del caricamento 
del programma Seguite attentamente 
questa procedura: 

1 . Spegnete il VIC 20 
2 Inserite l'espansione di memoria da 
almeno 8 Kbyte 


62 SUPERCOKHUOUKfc 1 * 5 ri» 


3 Digitate in modo diretto ]e seguenti sono essere in numero tale da crearvi 20. invece. Blondel! è imprigionata in 

istruzioni seri problemi nel completamento della fondo ad un profondo tunnel: per sai- 

POKE4432 POKE32‘256,0:NEW [re- vostra missione. varia dovete volare fino in fondo ad es- 

turo] Nella versione per C64 la principessa so ed atterrare; si aprirà una porta se- 

POKEb^BtESYSSae^S [returnj si trova in cima ad una torre: per salvar greta e la principessa diventerà visibile, 

4 Caricate il programma e date il RUN la avvicinatevi semplicemente a lei Se Toccatela semplicemente per salvarla 

avete agito con la necessaria delicate*- e per caricarla sul tappeto e portarla 

Nella versione per ViC 20 gli uccellata za, Blondell scompare e voi diventate sana e salva alla base (uccellate! per 

non sparano lampi di energia, ma pos di colore blu. Nella versione per VIC mettendo...} 


Rescue of Blondell versione per VIC 20 

4317 

DATA 

208,9,169,1,133,3, 169,36 








: rem 

! 48 

10 PRINT" 

{CLRH 3 GIU ' } RESCUE OF BLONDELL 

4325 

DATA 

141 ,154,31,104,74,72,176,15 


" 

SPRINT"! 2 GIU *} ATTENDERE, * * ,T 




: rem 

29 



x rem 

243 

4333 

DATA 

169,33,1 33,109,224,7, 176,6 


20 FORIMI Q9TQ581 2 ; rem 

16 



; rem 

245 

3 0 RE ADA : C K-CK + A : PGKE I , A : NEXT ; rem 

87 

434! 

DATA 

32,245, 17,76,252,16,202,104 


40 I FC K< > 1 7677 3THENPRI NT '* ERRORE NELLE 

IST 



: rem 

24 

RUZIONI DATA ! M n : END :rem 

39 

4349 

DATA 

74, 176,4,169,1,133,113,169 


50 SYS4109 ; rem 

50 



i rem 

252 

4 1 09 

DATA 

32,12,19,32,58,19, 32, 127 


4 3 57 

DATA 

127,141 ,34,145,44,32,145,48 




: rem 

136 



: rem 

37 

41 I 7 

DATA 

16, 32,150,18,32, 68,19,32 


4365 

DATA 

15,169, 34, 133, 109, 224,15,144 



: rem 

136 



: rem 

05 

41 25 

DATA 

222,20,32,181 ,16,32,11 7,19 


4373 

DATA 

6, 32, 176,17, 76, 29, 17, 2 32 




i rem 

224 



: rem 

151 

41 33 

DATA 

32,3,19,32,117,19,32,19 


4381 

DATA 

1 34, 1 ,132,2,32,51 ,17,32 




: rem 

82 



: rem 

71 

4141 

DATA 

20,32,128,21 ,173,141 ,2,208 


4389 

DATA 

95, 17, 163, 109, 160,0,145, 251 




: rem 

21 8 



: rem 

43 

4149 

DATA 

251 ,165,4,240,229, 165,2,201 


4397 

DATA 

169,2,32,82,19,96,32,79 




s rem 

28 



: rem 

116 

4157 

DATA 

10, 208 ,223, 165,0,201 ,229,208 

4405 

DATA 

17,32,104,18,24,138,101 ,251 




: rem 

71 



; rem 

18 

4165 

DATA 

217,32,170,16,160,21 , IBS, 12 


4413 

DATA 

133,251 ,165,252,105,0, 1 33,252 



:rem 

23 



; rem 

116 

41 73 

DATA 

22, 1 53,132,30,136,16,247,165 

4421 

DATA 

32,122,18,136,208,250,32,87 




i rem 

77 



: rem 

27 

4181 

DATA 

65,24,101 ,63,1 33,65,1 65,66 


4429 

DATA 

1 7,96,120,133,1 05,134, 106,1 32 



; rem 

242 



: rem 

125 

41 89 

DATA 

101 ,64,133,66,32,68,19,160 


4437 

DATA 

107,96,165,105,166,106,164,107 



: rem 

247 



: rem 

1 92 

4 ì 97 

DATA 

10, 1 85, 56,22, 1 53, 1 81 , 30,136 


4445 

DATA 

88,96,32,79,17,1 60,0,177 




: rem 

33 



: rem 

161 

4205 

DATA 

16,247,32, 128,21 ,165,203,201 


4453 

DATA 

251,240,20,201,38,240,8,201 




: rem 

68 



: rem 

13 

421 3 

DATA 

11 ,240,149,201 ,28,208,246,76 


4461 

DATA 

36,208,56,169,1,133,4,198 




; r em 

78 



; rem 

201 

4221 

DATA 

34,253,169,147,32,210,255,32 


4469 

DATA 

69, 165,69, 201 ,0,208,44, 169 




x rem 

77 



; rem 

4 

4229 

DATA 

68,19,160,18, 185,67,22,153 


4 4 77 

DATA 

1 5, ! 41 , 14, 144, 1 69, 39, 1 45, 251 




: rem 

255 



; rem 

92 

4237 

DATA 

222, 30,1 36, 16, 247, 32, 249,253 


4 4 35 

DATA 

32,82,19,88,165,162,105,100 




;rem 

83 



: rem 

40 

4245 

DATA 

164,203,1 05,94,236,201 ,49,144 

4493 

DATA 

197,162,208,252,32,170,16,169 



s rem 

1 40 



: rem 

147 

4253 

DATA 

247,201 ,58, 176,243,56,233,48 


4501 

DATA 

0, 160, 21 , 1 33,63, 1 33, 64,185 




: rem 

95 



j rem 

225 

4261 

DATA 

1 0,141 ,72,3,96,169,32,160 


4509 

DATA 

34,22,153,132,30,136,16,247 




; rem 

185 



: rem 

27 

4269 

DATA 

0, 1 53,0,30, 1 36,208,250,96 


4 517 

DATA 

76,97,16,169,32,145,251 ,32 




:rem 

185 



: rem 

255 

4277 

DATA 

166,1,164,2,32,51,17,32 


4525 

DATA 

87, 17,96,32,79,1 7, 32, 1 04 




: rem 

85 



: rem 

1 55 

4285 

DATA 

95, 17, 169,0* 141 ,19,145,173 


4533 

DATA 

18, 1 65,0, 201 ,10,240,56,162 




: rem 

2 52 



; rem 

22 4 

4293 

DATA 

17,145,74,74,74,176,5,192 


4541 

DATA 

1 9, 1 60,1 , 1 77,251 r 208, 1 0, 1 69 




: rem 

21 0 



trem 

40 

4301 

DATA 

2,144,1 ,1 36,74,72, 176,19 


4549 

DATA 

32,145,251 ,136,208,3,32,98 




: rem 

1 36 



; rem 

248 

4309 

DATA 

200,1 92,19,208,14,136,165,3 


4557 

DATA 

1 9, 1 69,0, 145, 251 , 32,02, 1 9 




i rem 

30 



; rem 

200 
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4565 

DATA 

200, 200, ! 92,22 r 208, 229, 189, 1 80 



: rem 

1 84 

4573 

DATA 

23, ì 36*145,251 ,169,0,32,62 




: rem 

241 

4 587 

DATA 

1 9, 32,122,1 8, 202,208,21 0,1 98 




: rem 

80 

4589 

DATA 

0-, 32, 58, 1 8, 32, 87, 1 7, 96: rem 

62 

4597 

DATA 

32, 79, 1 7, 32, 1 04,1 8, 1 65,0 




: r em 

1 47 

4605 

DATA 

201 , 229, 240, 56, 162, 1 9, 1 60, 20 




:rem 

74 

461 3 

DATA 

177,251 , 208, 20, 169, 32, 1 45, 251 



: rem 

134 

4621 

DATA 

200,192,21,208,3,32,98,19 




:rem 

185 

4 62 9 

DATA 

1 69,0,1 45, 251 , 32,82,1 9,1 36 




;rem 

248 

4637 

DATA 

136,16,229,189,200,23,200,145 



: rem 

133 

4645 

DATA 

251 ,169,0,32,82,19,32,122 




: rem 

1 88 

4653 

DATA 

1 8,202,208,21 0,230,0,32,58 




: rem 

225 

4661 

DATA 

1 8,32,87,1 7,96, 169,32,160 




: rem 

207 

4669 

DATA 

1 9, 1 53, 1 60, 23, 1 53, 200,23, 1 36 




: rem 

82 

4677 

DATA 

1 6,247,164,0,1 92,1 7,240,1 2 




: rem 

242 

4665 

DATA 

1 85,1 81 , 22,163,1 69, 0,1 53,1 80 




: rem 

98 

4693 

DATA 

23,136,16,250,164,0,185,202 




: rem 

30 

4701 

DATA 

22,168,169,0,1 53,200, 23, 1 36 




; rem 

23 

4709 

DATA 

1 6, 250,96, 1 69,0,1 33,251 , 169 




: rem 

46 

4717 

DATA 

30, 1 33,2 52,169,0,1 33, 11 0, 1 73 




: rem 

72 

4725 

DATA 

3, 1 44, 1 6, 251 r 96 r 1 65,251 ,24 




: rem 

244 

4733 

DATA 

1 05,22, 1 33, 251 , 1 65, 252, 105, 0 




: rem 

67 

4741 

DATA 

1 3 3,252,96,1 65,251 ,56,233,22 




: rem 

38 

4749 

DATA 

1 3 3,251 ,1 65,252,233,0, 133,252 



: rem 

1 30 

4757 

DATA 

96,169,10, 1 33,2,1 69,7,133 




: rem 

204 

4765 

DATA 

1 ,169,1 47,32,21 0,255,1 69,0 




: rem 

245 

4773 

DATA 

133, 113,133,11 4,133,3,133,4 




: rem 

1 7 

4781 

DATA 

168,153,220,23,136,208,250,169 



: rem 

190 

4789 

DATA 

34, 1 33, 1 0 9, 1 33, il 6, 1 60, 22,32 




: rem 

81 

4797 

DATA 

1 76,1 7, 1 36, 16,250, 1 60,0,1 65 




: rem 

44 

4805 

DATA 

0,128,153,0,28,185,0,129 




: rem 

135 
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481 3 

DATA 

1 53,0,29, 1 36,208,241 , 1 69,2 55 



: r em 

89 

4821 

DATA 

1 41 , 5,1 44,160,79,1 85,101 ,22 




: rem 

23 

4829 

DATA 

1 53,3,29,1 36,1 6,247, 160,7 




:rem 

205 

4837 

DATA 

185,173, 22,1 53,0,28,1 36,16 




: rem 

24 5 

4845 

DATA 

247, 1 69, 232, 1 33, 63, 1 69, 3, 1 33 




: rem 

97 

4853 

DATA 

64, 1 69,0, 1 33,65, 1 33,66, 1 33 




: rem 

248 

4361 

DATA 

70, 169,25, 1 33,69,96,165, 162 




: rem 

57 

4869 

DATA 

1 05, 5, 1 97, 16 2,208,2 52,96,1 60 




; rem 

103 

4077 

DATA 

1 2, 1 69,8, 1 53, 1 67, 23, 1 36, 1 6 




: rem 

0 

4885 

DATA 

250, 1 60, 242, 1 62,9, 1 38, T 5 3, 1 81 



: rem 

1 42 

4893 

DATA 

22,32,58, 19,201 ,150,176,8 




: rem 

197 

4901 

DATA 

224,3,144, 9,202,76,50,19 




:rem 

1 37 

4909 

DATA 

224,16,176,1,232,1 36,208,229 




: rem 

90 

491 7 

DATA 

169,252,133,0,96,165,108,10 




: rem 

40 

4925 

DATA 

10,56,101 ,108,1 33,1 08,96, ! 69 




: rem 

88 

4933 

DATA 

0,160,0,153,0,1 50,1 53,0 




: rem 

64 

4941 

DATA 

I 51 , 1 36,208, 247, 96,72, 1 65, 251 



: rem 

148 

4949 

DATA 

1 33, 43, 1 65, 2 52, 24, 1 05, 1 20, 1 33 



: rem 

1 29 

4957 

DATA 

44,1 04,1 45,43,96,165,1 10,208 




: rem 

92 

4965 

DATA 

1 4,32,136, 18, 169,32,145,251 




i rem 

42 

4973 

DATA 

32, 1 22, 1 8, 1 69,1 ,1 33, 1 1 0,96 




: rem 

241 

4981 

DATA 

1 65,11 4,20 8,44,165,11 3,240,3 9 



: rem 

1 39 

4939 

DATA 

165,2 51 , 1 33, 253, 1 65,252, 1 33, 

2 54 



: rem 

248 

4997 

DATA 

1 69,1 , 1 33, 1 1 5, 1 69, 1 5, 1 41 , 1 4 




: rem 

43 

5005 

DATA 

144, 165, 109,201 ,33,203,6,169 




: rem 

80 

5013 

DATA 

1,1 33,1 1 1 ,208,4,1 €9, 0,1 33 




: rem 

167 

5021 

DATA 

1 1 1 , 1 69,7,1 33,1 1 2, 1 33, 1 1 4, 96 




: rem 

71 

5029 

DATA 

1 77,253, 24 0,99, 1 65, 1 1 5,208,6 




: rem 

98 

503 7 

DATA 

T 60,0, 1 69, 32, 1 4 5,2 53, 1 69, 0 




: rem 

237 

5045 

DATA 

1 33,11 5, 165,11 1 , 208, 9,230,253 



: rem 

1 23 

5053 

DATA 

20 8, 2, 2 30,254,76, 2 06, 1 9, 1 98 




: rem 

40 

5061 

DATA 

253, 1 65, 253,201 , 255, 208,2, T 98 



: rem 

1 35 

5069 

DATA 

254, 1 65, 253, 1 3 3,2 51 , 1 65,254, 

1 33 



: rem 

24 0 

5077 

DATA 

252, 198, 1 1 2, 1 65, H 2, 240,4 8, 10 



: rem 

131 

5085 

DATA 

7 0, 1 0, 1 0, 24, 1 05, 1 58, 1 41 , 1 3 




: rem 

21 5 

5093 

DATA 

1 44, 1 77, 25 3,2 40, 34,201 , 38, 208 



: rem 

134 


5101 DATA 2.0, 32, 1 1 4,21 , 169 f 39 f 1 45,253 

; rem 21 

5109 DATA 169, 7, 32, 82, 19, 169, 15,141 

:rem 201 

5117 DATA 14,144,76,1 2,20,169,35, 145 

; rem 238 

5125 DATA 253,169,0.32,82,19,96,169 

: rem 2 05 

5133 DATA 0,133,113,133,114,96,160,0 

;rem 217 

5141 DATA 132,25,185,220,23,170,133,20 

; rem 62 

5149 DATA 185,221,23,168,133,21,132,26 

; rem 80 

5157 DATA 32,51,17,160,0,177,251,76 

:rem 190 

5165 DATA 120,20,169,32,145,251,164,26 

srem 78 

5173 DATA 32,58,19,201,215,144,114,228 

:rem 80 

518! DATA 1,240,7,144,4,202,76,71 

; rem 81 

5189 DATA 20,232,196,2,240,7,144,4 

srem 138 

5197 DATA 136,76,82,20,200,132,26,32 

:rem 236 

5205 DATA 51,17,32,148,20,169,38,160 

;rem 238 

5213 DATA 0,145,251,169,6,32,82,19 

srem 138 

5221 DATA 164,25,138,153,220,23,165,26 

: r em 76 

5229 DATA 153,221,23,200,200,204,72,3 

; rem 9 

5237 DATA 208,158,96,201,38,240,179,165 

: rem 151 

5245 DATA 21,240,175,164,25,32,58,19 

; rem 242 

5253 DATA 74,74,74,74,153,220,23,169 

ì rem 2 51 

5261 DATA 0,1 53, 221 ,23, 76, 112, 20,1 60 

;rem 217 

5269 DATA 0,177,251,201,32,240,17,201 

; r em 20 

5277 DATA 33,240,13,201,34,240,9,166 

: rem 233 

5285 DATA 20,164,21,132,26,32,51,17 

srem 179 

5293 DATA 96,32,58,19,201,60,176,8 

srem 155 

5301 DATA 2 24,20,240,4,232,76,21 9,20 

srem 221 

5309 DATA 201,120,176,8,224,0,240,4 

; x em 173 

5317 DATA 202, 76, 21 9, 20, 201 , 1 80, 1 76 f 5 

: rem 23 

5325 DATA 192,1,240,1,136,201,181,144 

: rem 1 7 

5333 DATA 5,192,20,240,1,200,76,82 

srem 127 

5341 DATA 20,120/169,235,141,20,3,169 

: r em 21 

5349 DATA 20,141,21,3,88,96,165,25! 

; rem 1 96 

5357 DATA 72,165,252,72,198,116,208,3 

s rem 48 

5365 DATA 32,38,21,160,7,165,116,201 

: rem 233 

5373 DATA 10,144,20,173,14,144,240,3 

; r em 222 

5381 DATA 206,14,144,185,141,22,153,48 

: r em 82 


5339 DATA 2 9 , ! 36 , 1 6 , 2 4 7 , 76 , 29 , 2 1 # 1 3 5 

: rem 9 

5397 DATA 133,22,153,48,29,136,16,247 

s rem 47 

5405 DATA 104,133,252,104,133,251,76,191 


541 3 

DATA 

; rem 

234,169,20,133,116,32,104,18 

1 73 

5421 

DATA 

: rem 

1 62, ! 9, 1 60,21 , 1 77, 251 , 201 , 39 

72 

5429 

DATA 

: rem 

1 44, 27, 201 ,42, 1 76, 23,24, 1 05 

77 

5437 

DATA 

: rem 

1 , 72, 169, 1 30, 1 41 , 1 3,1 44, 1 04 

28 

5445 

DATA 

s rem 

201 ,42, 208, 2, 1 69, 32, 1 45, 251 

23 

5453 

DATA 

s rem 

169,7,32,82,19,136,16,220 

28 

5461 

DATA 

: r em 

32,122,1 8,202,16,212,198,63 

1 96 

5469 

DATA 

: rem 

1 65,63,201 ,255,203,14,1 93,64 

28 

5477 

DATA 

: rem 

1 65,64,201 , 255,203,6,1 69,0 

1 01 

54 8 5 

DATA 

: r em 

1 33, 63,1 33, 64, 96, 165,65,24 

2 50 

5493 

DATA 

: rem 

1 05, 1 0, 1 33, 65, 1 65,66,105,0 

1 

5501 

DATA 

: rem 

1 33, 66, 96, 1 65, 65, 133, 73, 165 

234 

5509 

DATA 

: rem 

66,133,74,169,14,133,77,32 

47 

5517 

DATA 

: rem 

1 97, 21 , 1 65, 63, 1 33,73, 165, 64 

254 

5525 

DATA 

; rem 

133,74,169,36,133,77,32,197 

48 

5533 

DATA 

; rem 

21,165,69,133,73,165,70,133 

53 

5541 

DATA 

: rem 

74,1 69,58, 1 33,77,32,1 97,21 

39 

554 9 

DATA 

: rem 

160,4,185,86,22,1 53,1 89,31 

3 

5557 

DATA 

: rem 

1 85,91 , 22, 1 53, 211 , 31 , 1 85,96 

255 

5565 

DATA 

: rem 

22, 153,233,31 ,1 36, 16,235,96 

46 

5573 

DATA 

: rem 

1 69,0, 1 33,98, 1 33, 99, 1 33, 1 00 

33 

5581 

DATA 

: rem 

1 62,15,6,73,38, 74,1 20,248 

43 

5589 

DATA 

: rem 

1 65,98, 1 01 , 98, 1 33, 98, 1 65,99 

1 99 

5597 

DATA 

: rem 79 

1 01 ,99, 1 33,99, 165, 1 00, 1 01 ,1 00 

5605 

DATA 

; rem 1 3 3 

1 33, 1 00,216,88,202,1 6,227,1 62 

5613 

DATA 

; rem 

2, 181 ,98,72,74,74,74,74 

126 

5621 

DATA 

; r em 

32,2,22,104,41, 1 5,32, 2: rem 

1 1 1 

1 4 

5629 

DATA 

22,202,1 6,237,96,230,77,1 64 


5637 

DATA 

; rem 

77,9,48, 1 53, 1 80, 31 ,96,25 

44 

564 5 

DATA 

; rem 

1 5, 21 , 32, 1 9, 1 ,22, 5,4 srem 

1 62 
1 84 

5653 

DATA 

32, 20, 8, 5, 32, p 1 6, 1 3, 9 :rem 

1 95 

5661 

DATA 

14,3,5,19,19, 16,15,15 srem 

24 4 

5669 

DATA 

18,32,16,18,9,14,3,5 :rem 

204 

5677 

DATA 

19,19,32,2,12,15,14,4 srem 

244 

5685 

DATA 

5,12,12,16,12,1,25,32 srem 

232 

5693 

DATA 

1,7,1,9,14,63,14,21 srem 

141 

5701 

DATA 

13,2,5,18,32,15,6,32 srem 

1 81 

5709 

DATA 

2,9,18,4,19,32,49,45 srem 

208 
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5717 

DATA 

57, 19,3,15,18,5,2,15 

: rem 

199 

49208 

DATA 

202,208,250, 169,6,141,39 


5725 

DATA 

14,21 ,19,13,1,7,9,3 

: rem 

1 39 



: rem 

198 

5 73 3 

DATA 

12,12,4,60,12,189,126 

,0 


4921 5 

DATA 

208,1 62,32,142,2,68,142 





: rem 

78 



: rem 

141 

5741 

DATA 

48,48,32,60,48,189,126,0 


49222 

DATA 

3,68, 142,2,70,142,3 :rera 

192 




: rem 

153 

49229 

DATA 

70, 169, 1 ,1 33, 2, 32, 1 64 :rem 

45 

5749 

DATA 

0,0,84,170,0,0,0,0 

: rem 

75 

49236 

DATA 

1 95, 76, 1 25,1 92, 169,1 3, 205 


5757 

DATA 

24,3^,90,60,90,24,60, 

126 




: rem 

5 




: rem 

146 

49243 

DATA 

60,3,1 69,64,237,61 , 3 : rem 

ì 

5765 

DATA 

0,0,1 95, 60,24,36,0,0 

; rem 

185 

4 92 50 

DATA 

144,25,173,1 , 208,201 , ! 1 8 


5773 

DATA 

0,0,0, 1 26,1 53, 36,0,0 

: rem 

175 



: rem 

IBS 

5781 

DATA 

0,0,68,60,94,56,64,0 

: rem 

201 

49257 

DATA 

144, 18, 173,0, 208, 201 , 1 1 4 


5789 

DATA 

0,38, 124,60,1 24,58,72 

*0 




: rem 

1 B 9 




: rem 

96 

49264 

DATA 

176,11,169,168,133,113,169 


5797 

DATA 

194,102,252,46,255,90 

,44, 69 




: rem 

54 




i rem 

58 

49271 

DATA 

198,133,114,76,107,202,32 


5805 

DATA 

254,254,254,0,239,239 

,239,0 




; rem 

246 




; rem 

43 

49270 

DATA 

60,201 ,32,174,200,32,78 



:rem 144 

49285 DATA 199,32,53,196,206,248,207 



49292 DATA 
49299 DATA 

49306 DATA 

49313 DATA 

49320 DATA 

49327 DATA 

49334 DATA 


: rem 

208,8,32,35,200, 169, 2: rem 

I4i ,248,207,32,60,201 ,32 
i rem 

174,200,162,0,189,249,7 

: rem 

201 ,250,208,40,222, 170,2 
i rem 

208,35,169,253,157,52,3 

: rem 

169,252,157,55,3,1 38,10 

: rem 

160, 169,25, 153,3, 208, 173 
: rem 


49341 DATA 
49348 DATA 
49355 DATA 
49362 DATA 
49369 DATA 


27,212,174,60,3,224,15 

: rem 

176.4. 20 ì , 1 20, 144,242,1 53 

; rem 

2,208,232,228,20,208,204 
: rem 

173. 31 .208.72.74. 144.20 

: rem 

32,211 ,202,169,10,133,113 
: rem 


13 

47 

195 

151 

174 

151 

155 

208 

88 

240 

189 

146 

235 
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[RVSjRESCUE OF BLONDELL" : rem 2 4 

20 FRI NT" { 4 GID 1 )"TAB(11) H {CYN} (RVStSTO 
INSERENDO IL L/M* * , 14 :rem 122 

30 PRI NT" { 4 GIU 1 } "TA8( 1 1 ) 14 {CYNHhVS} ATTE 
NDERE PREGO*,." ;rem 154 

40 FORI = 4 91 52T05 1 972 :rem 129 

50 READA;CK-CK+A:POKEI,A:NEXT :rem 89 

60 IFCK031 8395THENPRINT” ( 3 GIU 4 } ERRORE 

NELLE ISTRUZIONI DATA ! 1 l 14 ; STOP 


49376 DATA 169,199,133,114,169,0,133 

: rem 6 

49383 DATA 106,133,107,76,107,202,104 

;rem 33 

49390 DATA 13,30,208,74,144,13,206 

:rem 140 

49397 DATA 167,2,174,167,2,224,255 

;rem 162 

49404 DATA 208,3,76,217,192,160,0 

i rem 94 

49411 DATA 74,72,144,26,185,249,7 

ì r em 110 




: rem 

201 

4941 0 

DATA 

201 ,250,240, 19,32,50,1 93 


70 SYS49152 

! : rem 

107 



: rem 

189 

49152 

DATA 

76,46,202,32,145, 196, 32 


49425 

DATA 

169,20,153,1 70,2,169,250 




: rem 

1 50 



: rem 

1 98 

49159 

DATA 

1 51 ,1 95,32, 142,194,32,1 97 


49432 

DATA 

153,52,3,153,55, 3, 153:rem 

42 



: rem 

4 

49439 

DATA 

249,7,104,200,196,20,208 


49166 

DATA 

1 93, 32,222, 193,32,164,195 




ì rem 

200 



; rem 

0 

49446 

DATA 

220, 173,141 ,2,208,251 ,32 


49173 

DATA 

32,209,201 ,173,31 ,208,165 




:rem 

1 87 



: rem 

242 

49453 

DATA 

68,193,76,27,192,173,168 


49180 

DATA 

2,208,57, 173,60,3,201 1 rem 

39 



: rem 

226 

49187 

DATA 

232,240,3,76,125,1 92,1 73 


49460 

DATA 

2, 24,105,10,1 41 , 1 6 8 , 2 : r em 

3! 



: rem 

20 3 

49467 

DATA 

173,169,2,105,0,141,169 


491 94 

DATA 

61,3,201,65,240,3,76 :rem 

25T 



; rem 

153 

49201 

DATA 

125,1 92, 162, SO, 32, 50, 1 93 


49474 

DATA 

2,96, 173,160, 2, 133, 253 




; rem 

1 87 



: rem 

108 


66 



49481 

DATA 

173,169,2,133,254,169, 1 30 




: rem 

255 

49488 

DATA 

141,249,207,32,120,193,173 




: rem 

49 

49495 

DATA 

167,2,133,253,169,0,133 




: rem 

153 

49502 

DATA 

254,169,147,141 ,249,207,32 




«rem 

48 

49509 

DATA 

120,193,165,106,133,253,165 



: rem 

93 

4951 6 

DATA 

107,133,254,169,218,141 ,249 



:rem 

101 

49523 

DATA 

207,32, 120, 1 93,96,1 60, 9 




: rem 

1 50 

4 95 30 

DATA 

1 69,0,1 41 ,32,203,1 65# 253 




: rem 

189 

49537 

DATA 

217,174,193,165,254,249,175 



: rem 

116 

49544 

DATA 

193,144,20,165,253,56,249 




:rem 

4 

49551 

DATA 

1 74, 193,133,253,1 65,254,249 



treni 

106 

49558 

DATA 

175,193,133,254,238,32,203 




; lem 

52 

49565 

DATA 

208,224,173,32,203,32,185 




:rem 

249 

49572 

DATA 

193,169,0,141,32,203,136 




; rem 

196 

49579 

DATA 

136,16,209,96,1,0, 10 : rem 

1 

49586 

DATA 

0,100,0,232,3,16,39 :rem 

192 

49593 

DATA 

238,249,207,174,249,207,9 




: rem 

18 

49600 

DATA 

48,1 57,208,6, 96, 1 60, 0 : rem 

52 

49607 

DATA 

169,0,133,251,169,64,133 




;rem 

204 

49614 

DATA 

252,162,40,169,32,145,251 




: rem 

247 

4 9621 

DATA 

2 0 G , 2 0 B , 249, 230,252, 202,208 



: rem 

79 

49628 

DATA 

244,96,160,0,1 69,0, 133 




: rem 

1 02 

49635 

DATA 

251 ,1 69,64,133,252, 169,0 




; rem 

207 

49642 

DATA 

145,251 , 32,121 ,194,200,192 




I rem 

34 

49649 

DATA 

16,208,246,169,0, 1 33,251 




; rem 

206 

49656 

DATA 

1 69,86,1 33/252/145, 251 , 32 




: rem 

5 

49663 

DATA 

121 ,194,200,192,27,208,246 




: rem 

45 

49670 

DATA 

1 69,0,1 45,251 ,32, 1 21 , 194 




i rem 

1 97 

496 77 

DATA 

200,208,66,230,252,232,224 




t rem 

40 

49634 

DATA 

2,208,59/169/1,141,2 l rem 

4 

49691 

DATA 

68 1 169,2,141 ,3,68, 169: rem 

70 

4969B 

DATA 

3, 1 41 r 2,70, 1 69, 4, 1 41 : rem 

2 

49705 

DATA 

3/ 70, 169,32, 1 41 ,0,68 : rem 

254 

4971 2 

DATA 

MI ,1,68,141 ,0,70,141 : rem 

33 

4971 9 

DATA 

0,66,141,1,66,141,2 :rem 

199 

49726 

DATA 

66,141/1,70,141,3/66 :rem 

253 

49733 

DATA 

160,16,1 69, 5,1 53, 0,86: rem 

54 

49740 

DATA 

200, 1 92, 22,20 8,24 8,96,1 73 




ì rem 

254 

49747 

DATA 

27,21 2,201 ,85,144,1 73, 201 




: rem 

246 

49754 

DATA 

160,176,14,165,252,201/72 




ì rem 

250 

49761 

DATA 

144,1 63,56,233,2,1 33,252 




: rem 

1 97 

4 9768 

DATA 

76,6,194,165,252,201 ,96 




: rem 

172 



49775 

DATA 

176,149,24,105,2,133,252 
: rem 

204 

49782 

DATA 

76,6,194,165,252,72/169 

: rem 

175 

49789 

DATA 

0/1 45, 251 , 230,252,230,252 
: rem 

245 

4 9796 

DATA 

165,252,201 ,136,144,242/104 
: rem 

93 

49803 

DATA 

133,252,96/169/4,141 ,60 

: rem 

153 

4981 0 

DATA 

3,169,64/141 ,61 ,3,169;rem 

53 

4981 7 

DATA 

147, 32, 210,255, 160, 255,169 
: rem 

50 

49324 

DATA 

14,153,255,21 5,1 53,254, 216 
: rem 

44 

49831 

DATA 

1 53,253,217,153,252,218,1 36 

:rem 95 

4 98 38 

DATA 

20B, 241 , 1 69, 1 , 1 41 , 33,208 
: rem 

202 

4 984 5 

DATA 

162,24,169,0,157/0,212 

: rem 

97 

4 9852 

DATA 

202, 16, 250, 169, 129, 141 ,18 
: rem 

251 

49859 

DATA 

212, 169,200, 141,15,212,169 
: rem 

45 

49366 

DATA 

1 5,1 41,24,21 2,160,4,162 

: rem 

1 42 

49873 

DATA 

21 ,24,32,240,255/ 160, 198 
: rem 

202 

4 9880 

DATA 

169,152,32,30,171 ,160,20 
: rem 

1 93 

4 9887 

DATA 

162,21 ,24, 32,240,255, 1 60 
: rem 

1 93 

49894 

DATA 

198, 169,160, 32, 30, 171 ,160 
: rem 

5 

49901 

DATA 

12,162,23,24,32,240/255 

: rem 

135 

49908 

DATA 

!6G, 1 99, 169,70 r 32, 30, 17! 

: rem 

210 

4991 5 

DATA 

169,129,141 ,26/208/169,127 
: rem 

60 

49922 

DATA 

141 , 13,220, 169,0,141 ,40 

: rem 

1 32 

49929 

DATA 

208,141 ,41, 208 ,141 ,42,208 
: rem 

248 

49936 

DATA 

141 ,45,208,1 41 ,44,208,141 
: rem 

248 

49943 

DATA 

43/208,169,11,141,46/208 
: rem 

204 

49950 

DATA 

169,251 ,141,255,7,141 ,254 
: rem 

255 

49957 

DATA 

7,1 41 ,253, 7,1 41 ,252, 7; rem 

56 

49964 

DATA 

169, 33, 1 41 ,4,212,169,208 
: rem 

209 

49971 

DATA 

133,106,169,7,133,107,169 
: rem 

4 

49978 

DATA 

0,133,108/169,16,141,5 

: rem 

105 

49985 

DATA 

21 2/169,240,141 ,6,21 2„ 1 69 
: rem 

1 
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49992 

DATA 

15,141 ,24,212,162,2,169 


50286 

DATA 

169,254,141 ,248,7,104,224 




: rem 

1 49 




: rem 

250 

49999 

DATA 

253, 1 57, 52,3,1 69,252, 1 57 


50293 

DATA 

205, 208,9,32,39,1 96, 

32 




: rem 

225 




;rem 

1 01 

50006 

DATA 

55, 3,202, 16,243,169,0: rem 

30 

50300 

DATA 

236, 1 95, 76, 1 30, 1 96, 232,74 


5001 3 

DATA 

141 ,18, 208,173,17,208, 41 





:rem 

247 



: rem 

182 

50307 

DATA 

176,5,169,1 ,141 ,128, 

3: rem 

41 

50020 

DATA 

1 27, 1,41 ,17, 208 ,160,7,1 69 


5031 4 

DATA 

1 42,0,208, 140,1,208, 

96 




: rem 

1 85 




: rem 

79 

50027 

DATA 

0,1 53, 0,57, 136, 16, 250; rem 

29 

50321 

DATA 

160,255, 1 85,231 , 1 96, 

1 53,1 27 

50034 

DATA 

160,47,185,104,198,153,0 





: rem 

87 



; rem 

1 90 

50328 

DATA 

62,1 85,104,1 97, 1 53,0 

,63 


50041 

DATA 

56,1 36,16, 247,169,2,141 





; rem 

146 



:rem 

141 

50335 

DATA 

136,208,241 ,169,255, 

141,21 


50043 

DATA 

35,208,169,0,141,34,200 





: rem 

34 



: rem 

140 

50342 

DATA 

208,169,2, 141 , 39,208 

,169 


50055 

DATA 

1 33, 2, 169, 200, 141 ,167,2 





: rem 

200 



: rem 

130 

50349 

DATA 

254, MI ,248,7, 169, 1 1 8, 141 


50062 

DATA 

169,0,141 ,168,2,141,169 





: rem 

253 



; rem 

140 

50356 

DATA 

1 ,208,169,1 38,1 41, 0, 

208 


50069 

DATA 

2,96,120,169, 123,141 ,20 





; rem 

140 



: rem 

136 

50363 

DATA 

1 73,22,208,41 ,247,1 41 ,22 


50076 

DATA 

3,169, 199, 141 ,21 , 3,a0;rem 

54 




; rem 

184 

50083 

DATA 

96, I 73, 60, 3, MI , 201 , 1 95 


50370 

DATA 

208,169,4, 141 , 62, 3,169 




: rem 

MI 




; rem 

96 

50090 

DATA 

173,61 ,3,141 ,202,195,169 


50377 

DATA 

0,1 41 ,63,3,169,20, 141 ;rem 

34 



: rem 

1 90 

50384 

DATA 

3 , 2 08, MI ,5,208,1 41 , 

7 : rem 

37 

50097 

DATA 

0,141 ,204,1 95, 1 69,4, 1 41 


50391 

DATA 

208, 1 69, 80, 1 41 ,2,208 

,169 




: rem 

1 40 




: rem 

200 

50T 04 

DATA 

205,195,162,19,169,0,141 


50 3 98 

DATA 

160, 1 41 ,4,208, 1 69,240,141 




; rem 

1 87 




: rem 

242 

501 1 1 

DATA 

63,3,1 73,17,208, 16,251 


50405 

DATA 

6,208,96,1 44,0,2,64 

: rem 

ì 96 



: rem 

82 

5041 2 

DATA 

0,16,1 84,0,38,20,0 

: rem 

1 27 

50118 

DATA 

160,39,185,0,0,153,0 :rem 

235 

5041 9 

DATA 

0, 41 , 1 6, 36,4, 68, 80 

; rem 

1 40 

50125 

DATA 

0,136, 16,247, 1 73,204,1 95 


50426 

DATA 

2,1 30, 36,1 ,64,168,0 

: rem 

T 3 8 



; rem 

1 89 

50433 

DATA 

176,0,1, 52, 64, 0,240 

: rem 

183 

50132 

DATA 

24,105,40,1 41 ,204,1 95,173 


50440 

DATA 

16,95,1 04, 208,196,0, 

1 28 




; rem 

227 




: rem 

142 

50139 

DATA 

205, 195,105,0,141 ,205,195 


50447 

DATA 

73,1 28,0, 166, 34, 160, 

MI 




: rem 

236 




: rem 

M0 

50146 

DATA 

238,202,195,238,202,1 95,202 

50454 

DATA 

72,32,1 ,34,74,0,202 

: rem 

185 



: rem 

86 

50461 

DATA 

41 ,0,0,160,0,0,2 

;rem 

16 

501 53 

DATA 

208,219,96,206,62,3,16 


50468 

DATA 

0,0,18,0,0,0,0 

; rem 

178 



; rem 

95 

50475 

DATA 

0,0, 0,0, 0,0,0 

: rem 

119 

501 60 

DATA 

50, 2 38, 60, 3, 208,3, 2 38: rem 

35 

504 82 

DATA 

0,0, 0,0, 0,0,0 

: rem 

117 

501 67 

DATA 

61 ,3,169,7,141 ,62,3 :rem 

1 99 

504 B9 

DATA 

0, 0,0, 0,0, 0,0 

: rem 

124 

50174 

DATA 

32,164,1 95,76,35,196,238 


50496 

DATA 

0,0,0,2,34,0,5 

: rem 

1 84 



: rem 

21 2 

50503 

DATA 

65,64,0,1 36,1 28,0,0 

: rem 

1 87 

50181 

DATA 

62,3,1 73, 62, 3,201 , 8 :rem 

1 89 

50510 

DATA 

0,0, 0,0, 0,0,0 

: rem 

1 09 

50188 

DATA 

208,21 ,206,60,3,173,60 


5051 7 

DATA 

0,0,0, 0,0, 0,0 

: rem 

1 1 6 



:rem 

87 

50524 

DATA 

0,0,0, 0,0, 0,0 

: rem 

1 1 4 

50195 

DATA 

3,201 ,255,206,3,206,61 


50531 

DATA 

0,0, 0,0, 0,0,0 

: rem 

ì 1 2 



;rem 

84 

50538 

DATA 

0,0,0,0,0,60,0 

:rem 

1 73 

50202 

DATA 

3,169,0,141,62,3,32 :rem 

1 80 

50545 

DATA 

0,66, 0,0, 66,0,0 

: rem 

237 

50 2 09 

DATA 

164, 195,32, 46,196,96,1 33 


50552 

DATA 

90,0,3,1 95,1 92, 12,66 

; rem 

249 



:rom 

209 

50559 

DATA 

48,16,66,8,32,66,4 

: rem 

1 66 

5021 6 

DATA 

38,134,39,132,40,96,1 65 


50566 

DATA 

73, 165, 146, 146, 36, 73 

,164 




: rem 

1 48 




: rem 

21 0 

50223 

DATA 

38,166,39,164,40,96,174 


50573 

DATA 

24,37, 168,189,21 ,168 

,195 




: rem 

156 




:rem 

216 

50230 

DATA 

0,208,172, 1 ,208,169,0;rem 

27 

50580 

DATA 

2) ,01 ,0,138,2,0,64 

: rem 

136 

50237 

DATA 

133,251 ,173,0,220,74,176 









: rem 

1 86 

50587 

DATA 

2, 0,64, 5,0, 1 60,0 

; rem 

35 

50244 

DATA 

5,192,47,144,1,1 36, 74: rem 

44 

50594 

DATA 

0, 0,0,0,0,255,0 

i rem 

229 

50251 

DATA 

1 76,5, 1 92, 1 76, 176, T, 200 


50 601 

DATA 

0,0,0,0,0,0,60 

: rem 

164 



: rem 

1 40 

50608 

DATA 

0,0,66,0, 128,66, 1 

; rem 

8 9 

50258 

DATA 

74,1 76,21 , 72,1 69,255,141 


5061 5 

DATA 

126,90,126,33,195,132,192 




;rem 

205 




: rem 

245 

50265 

DATA 

248,7,104,224,107,208,9 


50622 

DATA 

66,3,32,66,4,32,66 

: rem 

150 



; rem 

1 45 

50629 

DATA 

4,80,36,10,24,36,24 

: rem 

195 

50272 

DATA 

32,39, 1 96, 32, 4, 1 96, 76: rem 

57 

50636 

DATA 

20,24,40,3,189,192,0 

netti 

243 

50279 

DATA 

106, 196,202,74,176,21 ,72 


1 50643 

DATA 

195,0,1 ,0,128,2,0 

£ rem 

8! 



: rem 

201 

50650 

DATA 

64,2,0,64,5,0, 160 

jrem 

84 


68 SLEPERtDWMOilOBf* V"S 



50 65 7 

50664 

50671 

50678 

50685 

50692 

50699 

50706 

5071 3 

50720 

50727 

50734 

50741 

50748 

50755 

50762 

50769 

50776 

50783 

50790 

50797 

50804 

5081 1 

5081 8 

50825 

50832 

50839 

50846 

50 85 3 

50860 

50867 

50874 

50881 

5 0 833 

50895 

50902 

50909 

5091 6 

50923 

50930 

50937 

50944 

50951 

50958 

50965 

50972 

50979 

50986 

50993 

51 000 

51 007 

51 014 

51 021 

510 2 8 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


0,0,0,0,0,0,255 ; rem 

0,0, 0,0, 0,0,0 : re m 

0,0,1 5,1 28,0,31,192 : rem 

0,31 ,192,0,31 ,224,0 t rem 

1 5,240,0,3,224,96,3 : rem 

224.127.3.255. 1 95.3.255 

: rem 

2 52,3,224,0,3,2 2 4,0 : rem 

3.224. 0. 59.255. 1 56 . 6 7 i rem 
255, 1 30,1 31 ,255, 1 29, 71 , 24 

: rem 

226,56,231 ,28,0,0,0 : rem 

184.0. 0.0.0.0.0 : rem 

0,0, 0,0,1 ,240,0 irem 

3.248.0. 3. 248 .0.7 ; r em 

248.0. 1 5,240,6,7,1 92 ; rem 
254,7,192,195,255,192,63 

: rem 

255,1 92,0,7,192,0,7 3 rem 

1 92. 0. 7. 1 92.57.255.220 

: rem 

65,255,194,129,255,1 93,71 
: rem 

24.226.56.231.28.0. 0 :rem 
0,184,85,105,105,85,85 

: rem 

105.105.8 5,5,22,22,7 : rem 
15,63,62,59,30,148, 148 

:rem 

208,240,252,188,236,15,1 5 
: rem 

15,63,63,63,255,255,240 

: rem 

240.240.252.252.252.255.255 
: rem 

255.255.255.255.255.255.255 
; rem 

255,144,83,67,79,82,69 

; rem 

50.0. 144.77.65.71.73 ;rem 

67. 58. 0. 1 58,89, 79,85 ; rem 

32.8 3,65,86,6 9,68,32 : rem 

84,72,69,32,30,32,73 :rem 
78,67,69,83,83,32,33 :rem 
0,2 8,66,79,78,8 5,83 : rem 

17,17,1 57,157,157,1 57,1 57 

i rem 

83,67,79,82,69, 1 7,1 7 : rem 
1 57, 1 57, 1 5 7,1 57, 72, 7 3, 84 
: rem 


229 
1 1 9 
182 
1 84 
1 95 

151 
1 90 
50 

237 

181 

228 

220 

92 

253 

21 4 
200 

1 04 


13 

244 


103 

251 

106 

242 

151 

85 

1 04 

1 29 
10 

29 
16 
17 
22 

229 

1 6 

30 

21 3 


32,65,78,89,32,75,69 :rem 

89.0. 28.78.85.77.66 :rem 

69.82.32.79.70.32.66 ;rem 
73,82,68,83,32,40,49 :rem 
45,51 , 41 , 32,79,82,32 : rem 
81,32,84,79,32,81,85 :rem 

73.84.0. 158.80.79.79 :rem 

82.32.80.82.73.78.67 :rem 
69,83,83,32,66,76,79 :rem 
7 8,68,69,76,76,0,7 : r em 
1 2, 1 20,7,233,1 20, 8, 97 :rem 
240, 7, 233,240,7, 1 2, 240 

: rem 

7, 1 2,1 20,7,233,1 20,3 : rem 
97,120,10,143,120,7,233 

„ : rem 

120,8,97,1 20, 7, 1 2, 240: rem 
2 3,66,79,78,35,83,53 : rem 
0,162,3,1 60,255,1 36,208 

; rem 


25 
232 
1 1 
6 
2 
1 3 
1 8 
20 
30 
1 82 
48 

89 
24 3 

118 

29 

23 

1 26 


253,202,208, 248, 1 65, 1 08,208 


i rem 87 



51035 DATA 30,198,109,208,26,169,20 




: r em 

1 95 

51042 

DATA 

133,109,198,106, 165,106,201 
: rem 

78 

51049 

DATA 

255,208,14,1 98,107,16,10 
: rem 

1 94 

51056 

DATA 

1 69,1 ,1 33,108,169,0,1 33 

: rem 

139 

51 063 

DATA 

706,133,107,96,169,1 ,1 41 
: rem 

1 89 

Sì 070 

DATA 

25,208,173,18,208,201,204 
: rem 

231 

51077 

DATA 

1 44, 36, 1 73,22, 208,41 , 248 
: rem 

196 

510 84 

DATA 

9,0,141 ,22,208,1 73,24: rem 

34 

51 091 

DATA 

208,41 ,240,9,5,141 ,24:rem 

33 

51098 

DATA 

208,1 73,22,208,41 ,239, 1 41 
: rem 

245 

51 105 

DATA 

22,208,169,0,141,18,208 

: rem 

133 

SI 112 

DATA 

76,205,199, 173,22,208,41 
; rem 

193 

51 1 1 9 

DATA 

240,13,62,3,141 ,22,208 

. : rem 

76 

Sì ì 2 6 

DATA 

169,205,141 , 18,208, 1 73,24 
: rem 

242 

SI 133 

DATA 

208,41 ,240,9,14,141 ,24 

; rem 

73 

511 40 

DATA 

208,1 73,22,208,9,1 6,141 

% rem 

134 

51 147 

DATA 

22,208,1 73, 1 3, 220, 41 , 1 

r rem 

75 

51 1 54 

DATA 

240,76,206,1 33,3,208,68 

: rem 

143 

51 ì 61 

DATA 

1 69, 5, 1 41 , 1 33, 3, 1 73, 1 32 

: rem 

1 34 

51 1 68 

DATA 

3,208,30,169,1 ,141,132 

i rem 

84 

51 175 

DATA 

3,173,52,3,141,249,7 ;rem 

249 

51 ì 82 

DATA 

1 73, 53,3, 1 41 , 250, 7, 1 73 

: rem 

38 

51 1 89 

DATA 

54 , 3, 1 41 , 251 , 7, 1 69, 1 29 

: rem 

103 

51 1 96 

DATA 

141 ,11 ,21 2,208,28,173,55 
: rem 

1 90 

51 203 

DATA 

3,141 ,249,7, 173,56,3 ;rem 

245 

51210 

DATA 

141 ,250,7, ì 73,57, 3,1 41 

: rem 

79 

5121 7 

DATA 

251 , 7,169, 128, 1 41 , 7 1 , 21 2 
i rem 

185 

51 224 

DATA 

169,0,141,1 32,3 , 7 6 , 4 9 : r em 

41 

51 231 

DATA 

234,76, 188,254,1 62,0,1 38 
: rem 

1 97 

51238 

DATA 

74,1 68, 1 SS, 249, 7, 201 ,250 
: rem 

205 

512 45 

DATA 

240, 1 1 7, 1 73, 27, 21 2, 201 ,75 
: rem 

234 

51 252 

DATA 

1 44,43,201 ,1 05,1 76,6,222 
ì rem 

1 80 

51 259 

DATA 

2, 208, 76, 1 52, 200, 201 , 1 50 
:rem 

1 80 
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5)266 DATA 176,13,189,2,208,201,200 




: rem 

1 87 

51273 

DATA 

240, 77, 254,2, 2G8, 76,1 52 

: rem 

1 48 

51280 

DATA 

200,201 ,190,176,6,222,3 

irem 

1 26 

51 287 

DATA 

208,76, 152,200,254,3,208 
t :rem 

194 

51 294 

DATA 

76,1 52,200, 1 89,2,208,205 
srem 

1 95 

51301 

DATA 

0,208, 240,28, 1 44, 1 1 ,222 

: rem 

119 

51 308 

DATA 

2,208,169,1,157,1 76, 2; rem 

45 

51315 

DATA 

76, 1 33, 200,1 89, 2, 203, 201 
: rem 

134 

51 322 

DATA 

255,240,27,254,2,208, 1 69 
: rem 

193 

51 329 

DATA 

0,1 57,1 76,2, 1 89, 3,20 8 : rem 

50 

51 336 

DATA 

205, 1 ,208,240,18, 144,6 

: rem 

84 

51 343 

DATA 

222, 3,208,76,152,200,254 
: rem 

183 

51 350 

DATA 

3,208, 1 73,27,21 2,20? ,2 

: rem 

75 

51 357 

DATA 

176,5,169,1,157,80,3 :rem 

3 

51 364 

DATA 

232,232,228,21 ,240,3,76 

: rem 

1 36 

51371 

DATA 

37,200,96,162,0,189,192 

: rem 

1 49 

51 378 

DATA 

2,208,68,189,80, 3, 208srem 

59 

51 385 

DATA 

3,76,38,201 , 1 89,1 76,2:rem 

56 

51 392 

DATA 

1 57,224,2,240,1 2, 1 89,2 

: rem 

90 

51 399 

DATA 

208,56,233,20,157,8,208 

: rem 

155 

51406 

DATA 

76,21 8,200,1 89,2,208,24 

: rem 

144 

51 41 3 

DATA 

105,20,1 57,8,208,32,45 

: rem 

85 

51 420 

DATA 

201 ,1 41 ,255,2,1 73,21 ,208 
irera 

1 73 

51 427 

DATA 

1 3,255,2,141 ,21 ,208,139 

: rem 

1 40 

51 434 

DATA 

3,208, 1 57, 9,208,1 69, 1 srem 

49 

51 441 

DATA 

1 57, 1 92,2, 1 69,56,1 57,240 
; r em 

202 

51 44 8 

DATA 

2, 1 89, 224, 2,240,6,222:rem 

40 

51 455 

DATA 

8,208,76,7,201,254,8 : rem 

2 

51 462 

DATA 

208,222,240,2,208,26,169 

:rem 

1 90 

51 469 

DATA 

0,157,192,2,157,80,3 srem 

254 

51 476 

DATA 

32,45,201,24,1 05,255,141 
: rem 

1 34 

51 483 

DATA 

255,2,1 73,21 ,208,45,255 

:rem 

146 

51 490 

DATA 

2,141 ,21 ,208,232,232,223 
: rem 

1 80 

51 497 

DATA 

21 ,208,132,96,138,74,168 
: rem 

21 2 

51 504 

DATA 

169,16,192,0,208,1 ,96: rem 

46 

51 51 1 

DATA 

10,1 36,76,50,201 , 1 73,1 29 
srem 

1 82 

5151 8 

DATA 

3,203, 77,173, 1 28,3,208 

: rem 

100 

51 525 

DATA 

1,96,169,1,141,129,3 srem 

2 50 

51 532 

DATA 

1 73, 21 , 208, 9,1 28, 1 4} ,21 

*;rem 

135 

51 539 

DATA 

208, 1 69, 1 29, 1 41 , 4,21 2,169 
*: rem 

254 

51 546 

DATA 

0,1 41 ,16-, 208, 1 69, 85, 141 

:rem 

•1 45 

51553 

DATA 

131 ,3, 173, 1,208, 141, 15 

: rem 

79 
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51560 

DATA 

208, 1 73,248,7, 201 ,255,203 
; rem 

246 

51 567 

DATA 

15,169,1 ,141 ,130,3,173 

: rem 

89 

51 574 

DATA 

0,208,56,233,1 9,14] ,14 

srem 

90 

51 581 

data 

208,96,1 69,0, 1 41 , 1 30,3 

:rem 

92 

51 588 

DATA 

173,0,208,24,105,19,141 

;rem 

142 

51 595 

DATA 

14,208,96,173,130,3,208 

: rem 

149 

51602 

DATA 

26,238,14,208,1 73,14,208 
: rem 

190 

51 609 

data 

201 , 255,208,19,1 73,1 6,208 
: rem 

246 

51616 

DATA 

9,128,141 ,16,208,1 69,0 

: rem 

96 

51623 

DATA 

141, 14,208, 76, 176, 20! ,206 
:rem 

238 

51630 

DATA 

14,208,206,1 31 ,3, 1 73,1 31 
srem 

176 

51637 

DATA 

3,141 ,1 ,212,208,21 ,173 

: rem 

79 

51644 

DATA 

21 ,208,41 , 1 27, 1 41 ,21 , 208 
: rem 

1 91 

51 651 

DATA 

169,0,1 41 , 1 29,3,1 41 , 1 28 

: rem 

1 38 

51 658 

DATA 

3, 1 69, 1 28, 1 41 ,4,21 2, 96 

: rem 

1 03 

51 665 

DATA 

169,0,141 ,13,21 2,141 ,12 

: r em 

129 

51 672 

DATA 

212,141 ,8,212,1 60, 0,185 

: rem 

1 32 

51 679 

DATA 

34, l 99, 1 41 , 1 ,21 2, 1 85, 35 

: rem 

1 54 

51 686 

DATA 

199,141 ,0,212,1 90,36,199 
: rem 

208 

51 693 

DATA 

1 69,255, 1 33,41 ,1 98,41 , 208 
: rem 

3 

51 700 

data 

252,202,208,245,200,200,200 

srem 

1 

55 

51 707 

DATA 

1 92,36, 144,223,1 69,32, 1 41 
srem 

246 

51714 

DATA 

4,21 2, 169,1 1 4, 1 41 ,1 3,21 2 
; r em 

1 78 

51 721 

DATA 

1 69,17,141 ,12,212,141 ,8 

:rem 

1 34 

51 728 

DATA 

21 2, 96,120, 1 69,49, 1 41 , 20 
srem 

1 97 

51 735 

DATA 

3, 1 69, 234,1 41 , 21 , 3,169 

srem 

95 

51 742 

DATA 

0, 1 41 , 26,208,1 69,255,141 
srem 

1 91 

51 749 

DATA 

1 3, 220,1 69,0, 1 41 ,21 ,208 

srem 

135 

5? 756 

DATA 

88,96,32,91 ,255,162,10 

: rem 

1 1 0 

51 763 

DATA 

160,3,24,32,240,255,169 

s rem 

143 


51770 

DATA 

230,160,198,32,30,171 ,169 


SI 9! 7 

DATA 

203,112,252,76,46,202,169 




; rem 

245 



: rem 

246 

51 777 

DATA 

1 ,141 ,33,208,165,203,20? 


51 924 

DATA 

8,141,3,212,169,20,141 




: rem 

184 



; rem 

85 

51784 

DATA 

62,208,1,0,201, 56, 208: rem 

38 

51931 

DATA 

5,212,169,240,14? ,6,212 


51 791 

DATA 

4,1 62,1 ,208,14,201 , 59:rem 

39 



; rem 

1 34 

51796 

DATA 

2 08,4,1 62, 2, 208,6,201 : rem 

44 

51 93 8 

DATA 

169,9,141 ,15,212,169, 19 


51 805 

DATA 

8,208,229,1 62,3, 134,20 




; rem 

160 



t rem 

90 

51 945 

DATA 

141 ,4,21 2, 1 60,255,140,1 


51 81 2 

DATA 

1 38, 1 0, 1 33, 21 ,76, 3,1 92 




: rem 

130 



:zem 

36 

51 9 52 

DATA 

212,152,160,3,202,208,253 


51819 

DATA 

1 69,0, 1 41 ,24, 21 2, 32, 18 




i rem 

231 



: rem 

89 

51 959 

DATA 

136,208,250,168,140,39,209 


51826 

DATA 

202,173,24,208,41,240,9 




: rem 

52 



: rem 

139 

51 966 

DATA 

136,208,237,1 40,4,21 2, 96 


51 833 

DATA 

5, 1 41 , 24,208,1 69, 1 47, 32 




: r em 

202 



: rem 

146 






51840 DATA 210,255,162,10,160*8,24 

:rem 130 

51847 DATA 32,240,255,165,113,164,114 

36 

51854 DATA 32,30,171,165,106,133,253 

: rem 238 

51861 DATA 165,107,133,254,169,19,141 

: rero 45 

51868 DATA 249,207,32,120,193,162,18 

f r em 2 53 

51875 DATA 160,12,24,32,240,255,169 

:rem 195 

51882 DATA 194,160,198,32,30,171,169 

: r em 2 

51889 DATA 0,141,33,208,165,106,24 

: rem 144 

51696 DATA 109,168,2,133,253,165,107 

: rem 2 55 

51903 DATA 109,169,2,133,254,169,99 

; rem 212 

51910 DATA 141,249,207,32,120,193,36 

: rem 238 



Per ricevere le riviste arretrate 
di SUPERCOMMODORE co» cassetta 
compilate e spedite il coupon qui sotto! 


SU PER COMMODORE 

CÉQOU DI ORDINATONE RFVfSTE ARRETRATE CON CASSETTA ALLEGATA 
Un comprare e spedire in susta chiusa a 
4 i&tt - Viali? Reste II I 5-20124 Milano ■ Tèi SBBS22B 

Vogliate Inviarmi ■ numeri ♦ + « 

di SUPIRCOhmODRE cc#i cassetta . . Anne 

Al ptwMxa di L. 15.000 eàd. 

Contami allagati Q AssegUè allegalo n r 


” HO Ipédrio l'importo a irtzzo vaglia pollale 

Q No variato ( Importo sul ccp. n a tWi&2£M mie alAIO 1 J. »Qft ■ Milano 
Pacherò -n contrai segno di pollino H nc*v iman lo 


BUONO D’ORDINE PER RIVISTE ARRETRATE 
Anche se l'ordine riguardasse la sola cassetta! questa 
verrà comunque inviata insieme alla rivista al prezzo in- 
dicato. 

Nùfn* 

Cognome .... ....... 

Vim . ...... 

Citta CA.P Rtev 

Se nehietu tlllur* 

Codi F. e P. (va ¥ 

0*4* - ... 

Firma 

Por i residenti ■ireiitm - pagaménto anticipalo (vaglia o versamento 4u ma dep) 


V 


2 
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C on questo breve programma, velo- 
ce da caricate e subito pronto al- 
l'uso, ti offriamo la possibilità di accor- 
dare perfettamente la tua chitarra a 6 
o a 12 corde, con l'ausilio del tuo calco- 
latore. Il programma, che viene presen- 
tato in due distinte versioni, per C64 e 
per C16, ti permette di ascoltare la giu 
sta intonazione di una corda semplice 
mente premendo uno di questi tasti, in 


ordine dal suono più grave a quello più 
acuto: 

* E M per la sesta corda (MI basso) 

"A" per la quinta corda (LA) 

"D” per la quarta corda {RE) 

"G" per la terza corda {SOL) 

"6” per ta seconda corda (SI) 

CTRL + *E +1 per la prima corda (MI 
cantino). 

Se possiedi una chitarra a 12 corde, 


di C, Visto 
trad. ed adatt. 

di F. Sarcina 


puoi ottenere l'altezza di una corda del- 
la serie più acuta semplicemente pre- 
mendo il tasto SHIFT (o, naturalmente, 
SHIFT LOCK) insieme a quelli già elen- 
cati. 

I Tasti da premere per produrre i vari 
suoni non sono presi a caso: i più esperti 
si saranno infatti già accorti che questi 
corrispondono alla notazione in uso nei 
paesi anglosassoni. Per chi non la cono 
scesse ecco la sequenza completa delle 
1 note: 

C in notazione inglese= DO in notazione 
italiana 
D - RE 
E - MI 
F = FA 
G - SOL 
A ^ LA 
B « ST 

Non ci resta che augurarti un buon con- 
certo. sicuri di avere reso un po’ più 
facile e rapida la noiosa operazione del- 
l'accordatura. 


Accordatore per chitarra 
versione per C64 

8 D 1MH I { 1 2 ) , LO (12) , N05 (12) ì rem 115 

10 PR1NTCHRS (1 A) " {CLRH 8 DES } ACCORDATORE 
PER CHITARRA" : FORT -QTG 2000: NEXT 

: rem 0 


15 FRINT" tCLRÌt 4 GIU'H 6 DESjUSA I TAST 

I E/ft/D/G/B/ CTKL -E" : rem 216 

16 PRIHT”! 3 ClTTTT 7 DBS } PER UNA CHITARR 

A 6 CORDE.” s rem 32 

17 PRINT” { 3 GIU’H 7 DES) FREMI IL TASTO 

SHIFT - LOCK " :rem 168 

18 PRIHT"T“3“GIU , M 1 DES) PER LA SERIE DI 

CORDE PIU 1 " :rem Si 
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19 PRINT*' { 3 GIUMI 5 DES} ACUTA DELLA CHI 

TARRA 12 CORDE, " :rem 27 

20 S-54272:FORT=0TO23:POKES+Tr 0:NEXT:POKE 
S+24 , 1 2 ; POKES+5 , 1 7 i POKES+6, 2 4 3 

itero 94 

70 FORT = ÌTO?l : READHI , LO : H I (T) *HI : LO f T) "LO 
itlEXTT itero 32 

80 GETA9 : 1 FA$ = " "THEN80 ; rem 243 

90 A=- (A$="£ rt ) ~ 2 * ( A$ = " A ,r ) ~ 3* { A$= "D” ) -4* (A 
$ = »G")-S* tAS = ,, B")*6*(A$=CHR$(5ì ) 

treni T 71 

95 A“A“ 7* ( A$ = *' E“ } - 8* ( AS=" A” } stero 62 
97 A“ A- 9* ( A$ = ,|, D M ) - 1 0* { A$ ”"G M ) - 1 1 * t A$ = " B M } 

itero 34 

100 POKE5 , LO (A) ; POKES+ 1 , H I ( A ) itera 211 
1 50 POKES+4 ,17: FORI =QT020QQ ; KEXTI i POKES+4 
1 1 6 ; rem 1 8 3 

175 P0KE1 98,0: GOTO 80 Itero 165 

200 DATAI 0,1 4 3,1 4,24,1 8,209,25, 30,31 ,165, 
42,62,21 ,31 ,28,49,37,162,50,60,31 ,165 

treni 20 


Accordatore per chitarra 
versione per CI 6 

1 0 DIMNO (12) :rem M0 

20 PRINTCHR${14) "{CLR] i 8 DES 1 ACCORDATORE 
PER CHITARRA" :FORT=OTO 2000: NEXT 

irem 1 


ACsouhÓ- 


30 PRINT'MCLRH 4 GIU 1 H 6 DESlUSA I TAST 
I E/ A / D/G / B/ CTRL - E *' : rem 213 

40 PRINT"? I GIUTT 7 DES} PER UNA CHITARR 
A 6 CORDE, 11 itero 2 9 

50 FRI NT" { 3 Giti r } { 7 DES 3 PREMI IL TASTO 
SHIfT LQCK" itero 120 

60 PRINT' 1 i 3 GIU* } ( 7 DES} PER LA SERIE DI 
CORDE PIU' 11 itero 48 

70 PRINT" f 3 GIU'H 5 DESlACUTA DELLA CHI 
TARRA 12 CORDE," i rem 24 

80 FORT 3 OT0 1 2 1 READNO : NO < T ì s NO I NEXTT 

: rem 4 4 

90 GETA$ : I FAS * " " THEN90 : rem 245 

100 A=- (A5*"E"| +2*- (A$ = "A"> +3*- (A$-"D"J +4 
*- (A$-"C">+5*- {AS="B")+6*- (AS-CHRS (5) 

) ; rem 170 

no A=A+7* - ( A$ = " E" ) +8* - ( AS*" A" ) : rem 134 

120 A=A+9*- (A$="D" ) +1 0*- (AS“"G" ) +1 1 *- (A$» 
"B") “ irem 198 

130 I FA” QTHEN90 {rem 105 

140 VOL7:SOUNDl , BO(A) , 1 80 :rem 209 

150 GOTO 90 irem 56 

1 60 DATA0, 34 S, 51 6,643,739,798,854 ,685,770 
,834,881,798,854 : rem 1 24 



Le Novità Jackson 
puoi acquistarle 
in via Mascheroni 14 
a Milano e in tutte 
le migfiori librerie. 




DISTRIBUZIONE: un anello 
strategico tra fornitori 
e utenti finali. 



Dealer 


Dealer : Tunica rivista dedicata 
al mondo della distribuzione di home 
e persona] computer, software e libri. 


Dealer ; è n primo mensile italiano per 
chi vende home e personal computer, 
software, libri e accessori di informatica. 
Uno strumento indispensabile per 
computershop, librerie e cartolibrerie. 

Su SoftDealer. inviato solo in 
abbonamento, troverete tutte le notizie 
più utili, recensioni, test, prove di 
software, articoli di marketing, classifiche 
dei programmi e dei libri più venduti 
in Italia. 

SOFT DEALER è un'idea 

Uffici Tecnici e Commerciali: 

20125 Milano - Via M. Gioia. 114 
Tel. (02) 603415-680851 


P ROM RAM 

editrice 


ABBONATI A Dealer : Un modesto investimento 
I per essere informati sul futuro 

I Ritagliare e spedire in busta chiusa a: 

1 PROGRAM EDITRICE, Via M. Gioia 114, 201 25 MILANO 

■ □ Desidero sottoscrivere un abbonamento annuo (10 numeri L 25.000} 
alla rivista SOFT DEALER 

| □ Allego assegno di L 25.000 intestao a PROGRAM EDITRICE 




n° „„ Banca 

□ Ho effettuato pagamento tramite vaglia postale. 

□ Ho effettuato versamento su tcp n. 34510206 
intestato a Program- Milano e allego fotocopia ricevuta. 


NOME 

COGNOME 

AZIENDA 

VIA 

CAP, 


OTTA 


.... N° 
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DATA BASE: LUTILE E IL DI- 
LETTEVOLE 
: N. Freettotif 
Gruppo Editoriale Jackson 



Sono sempre in maggior numero le per 
sorse che, dopo aver acquistalo un com- 
puter piu che altro per curiosità 0 per 
esporre dei videogame più alfavan- 
guardia, si accorgono dopo un cerio 
tempo che questa prodigiosa macchi* 
netta può essere messa in grado di for- 
nire uri valido aiuto per la gestione dei 
propri pìccoli affari. 

L applicazione di interesse più generale 
per chi decidesse dì utilizzare profìcua 
mente U proprio computer è senz'altro 
quella della memorizzazione di informa- 
zioni Il Database, o archìvio elettroni- 
co. è un mezzo per fare in modo che il 
nostro computer “ inghiotta" tutti i dati 


che gli forniamo in modo disordinato e 
li memorizzi, ordinandoli secondo uno 
schema da noi prefissato. Il Database è 
un programma che deve essere "elasti- 
co* per adattarsi a qualunque tipo di 
dato si desidera memorizzare, dall ar 
chi vi azione delle fatture di un'azienda 
alle ricette di cucina per la massaia. A 
causa di questo aspetto polimorfo, in 
generale un buon Database è un pro- 
gramma molto complesso, che richiede 
almeno un minimo di esperienza per es- 
sere sfruttato in tutte le sue potenziali 
là. 

Questo libro è una guida per chi. dotato 
dì una conoscenza sufficiente del lin- 
guaggio BASIC, desidera crearsi un 
programma di gestione dati "su misu- 
ra": vengono da principio analizzati ì 
tipi di dati che possono essere elaborati 
dal computer ed il modo migliore di or- 
ganizzarli, per ottenere allo stesso tem- 
po affidabilità e velocità di esecuzione 
del programma 

Si passa quindi ad esaminare tutti e di- 
versi tipi di file che è possibile usare 
all’interno de! Database, con i vantaggi 
e gli svantaggi legati ad ognuno di essi, 
ed i metodi di ordinamento dei dati. 
Questi ultimi rappresentano, insieme al 
le tecniche di ricerca, i] cuore di un Da- 
tabase, e sono qui chiaramente spiegati 
con l'ausilio di esempi pratici, consisten- 
ti tn routine BASIC che eseguono i prin 
eìpali algoritmi di ordinamento e di ri 
cerca di un record, Si passa quindi alle 
applicazioni pratiche, consistenti in ana- 
lisi dei problemi tipici per un sistema di 
conti bancari, un'agenda, un controllo 
sulla giacenza, cataloghi ed indirizzi, 
elenco dei debitori e libro paga E molto 
facile, da questi esempi, trarre spunti e 
consigli, da utilizzare nel proprio specifi- 
co campo di applicazione, che permet- 
tono di iniziare subito con la stesura del 
proprio programma 
fi libro fornisce tutte le cognizioni tecni- 
che necessarie per la costruzione di un 
Database, e rappresenta un prezioso 


aiuto per chi non intende ricorrere a 
programmi ^preconfezionati’ * che, ap- 
punto per questo essere universali, ra 
ramante rispondono appieno alle singo- 
le esigenze 


IL LIBRO DEI GIOCHI PER COM- 
MODORE 16 E PLUS/4 
di A* Borra e M* Cristnib Grizzi 

ediz J. j tafr 

Recensione a cura dì 

Udo Bragagnolo 



La firma di chi scrive può apparire inso- 
lita per il lettore di SUPERCOMMODQ- 
RE: in effetti, non potendo ovviamente 
l'ottimo Mauro recensire un,., suo libro, 
la redazione di SUPER3INC si è presta- 
ta volentieri al gradito compito, anche 


SUPCTCQMMODOfiÉ® S/W 75 



per approfittare dell'occasione per fare 
al nostro collega i migliori auguri affin- 
ché il frutto della sua fatica riscuota 11 
(meritato) successo presso i lettori E 
ora, con la coscienza a posto, possiamo 
finalménte chiudere questo preambolo 
per entrare nel vivo del discorso. 

I due nuovi computer della Commodore 
sono finalmente dotati di un linguaggio 
BASIC evoluto, tale da permettere ah 
Tutente la realizzazione di programmi 
anche sofisticati, senza costrìngerlo ad 
‘"annegare'* in un mare di PEEK e PO 
KE, 

Tuttavia, il problema principale che si 
pone sempre alla comparsa sul mercato 
di nuovi modelli dì computer è la - sep 
pur inizialmente - difficile reperibilità 
di programmi da far “girare" subito sul- 
la nuova macchina 

La J soft, editrice della rivista che state 
leggendo, ha ora pubblicato questo nuo- 
vo volume dedicato al possessori del 
Commodore 16 e Plus/4 tutti I pro- 
grammi contenuti nel libro sono infatti 
perfettamente compatibili con entrambi 
i computer 

Questa è la prima raccolta attualmente 
disponibile in Italia di giochi per i nuovi 
computer Commodore, ed appartiene 
a quella generazione appena nata di 
nuovi libri “informatici", sviluppati pro- 
prio per lutilo diretto con il compu- 
ter. 

La struttura stessa del libro, infatti, è 
organizzata in modo tale da poter forni- 
re - tramite la cassetta allegata - i pro- 
grammi già pronti per Toso e, al con 
tempo, offrire insieme alla de scrizione 
completa di tutti i programmi anche i 
loro listati su carta. 

Una particolare nota di merito è senz'al- 
tro da attribuire a questi ultimi, che so- 
no stati realizzati (ormai i lettori di SU- 
PERCOMMODORE ci saranno abitua 
til} con grande cura e con f utilizzo di 
una particolare codifica la quale - uni- 
tamente all 1 uso di una stampante "iet- 
ter-quality" — li rende estremamente 
chiari e leggìbili anche per il neofita 

II libro si propone infatti come mezzo 
per ottenere un immediato divertimen- 
to con il proprio computer, permetten 
do contemporaneamente l'acquisizione 
delle tecniche utilizzate per la realizza- 
zione dei giochi stessi, 

I venti programmi proposti spaziano 
daH’“Adventure game” alPArcade” ed 
al simulatore di volo, offrendo una pa- 
noramica completa su tutti i tipi di vi 
deogioco più interessanti e divertenti; e 
la veste editoriale è quella ormai “classi- 
ca" della produzione J, soft, con una 
comoda rilegatura ad anelli. 


7 NOTE BIT, OVVERO LA MUSI- 
CA A PORTATA DI MANO 

Il Gruppo Editoriale Jackson, in collabo 
razione con la SIEL Software Dlvision, 
ha realizzato un'opera destinata a fare 
stona nell'alfabetizzazione informatica 
italiana. 


La pubblicazione quattordicinale M 7 
NOTE BIT" da poco avviata, rappre- 
senta Infatti quella che si può definire 
come la più completa, tecnicamente so- 
fisticata, e più interattiva pubblicazione 
su supporto magnetico /cartaceo fino 
ad ora realizzata in Italia ed all'estero: 
“7 NOTE BIT" permette infatti di cono- 
scere la musica, imparare a suonare 
uno strumento e, contemporanea me n 
te, imparare a programmare in BA 
SIC. 


“7 NOTE BIT 11 consiste in un fascicolo 
dì 32 pagine a colori, ed in una cassetta 
contenente il software da caricare sul 
proprio C64 Con il primo numero, vie 
ne offerta in omaggio una eccezionale 
tastiera musicale da applicare sopra il 
computer, che permette di eseguire co- 
modamente tutti gli esercizi che via via 
vengono proposti dal corso. 

“7 NOTE BIT" e infatti un vero e pro- 
prio corso, suddivìso in tre sezioni inte- 
grate. e dotato di soluzioni tecniche e 
grafiche mai viste fino ad ora su prodot- 
ti similari (basti, come unico esempio, 
la presenza di una routine - ovviamen- 
te in l/m — che permette al C64 di 
mantenere attivo il video durante ìl cari 


camento “turbo” da nastro, e nel con- 
tempo suonare una piacevole musica 
per intrattenere l'utente durante il cari- 
camento stesso!). Le tre sezioni del cor- 
so riguardano musica, tastiera ed Infor- 
matica musicale; La prima comprende 
nozioni generali sulla musica, gli stili e 
gli strumenti, mentre la seconda sezione 
consiste nella parte pratica che insegna 
a leggere la musica ed a eseguirla, con 
un'intensa interazione computer/ 
utente, tale da poter imparare diverten : 


dosi. Infine, la terza sezione introduce 
in modo estremamente chiaro le nozioni 
di programmazione musicale in BASIC: 
al termine del corso l'utente sarà perfet- 
tamente in grado di programmare da 
sé il computer, per ottenere gli effetti 
musicali desiderati. 

" 7 NOTE BIT", in edicola ogni 14 giorni 
a L. 10000, è disponibile anche in abbo- 
namento (15 fascicoli L, 145000). 


I libri italiani vengono offerti 
con li 10% di «conto 
sai presso di copertina 
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7 Note Bit 



Il 1985 è l'anno mondiale della musico.*, 
areparati con 7 note Bit * la nuova, fantastica opero 
ine in soli 15 fascìcoli quottordicinali (ciascuno 
corredato da una cassetta software per Commodore 64) 
I insegna veramente la musica. E puoi suonare subito 
Non perdere il primo numero. Pensa, compresa nel 
orezzo c'è anche la stupenda tastiera professionale per 
§ tuo Commodore 64* 



GRUPPO 

EDITORIALE 

JACKSON 

Scn franàsco*Lordro*Mflano 


IN COLLABORAZIONE CON SOL 



....E VINCI 30 STRAORDINARI 
COMMODORE PLUS/4 


GRUPPO ETHOS 



Gli 

ultimi 

saranno 

i 

primi? 

Giudicalo tu. 

Anche se, i'r ordine di tempo, 
siomo gli ultimi a use ire con (ibri 
"dedicati* ai più diffusi home e 
personal computer, siamo convinti 
che il lettore attento ed esigente 
apprezzerà fa qualità dei contenuti 
e fa foro presentazione. 
Abbiamo selezionato e tradotto i 
best-seller mondiali che accolgano 
quanto di più utile è stato scritto 
per il tuo computer. 

Scegli a colpe sicuro! 

Puoi ordinare direttamente i litoti presentati 
compitando ed inviando il coupon pubblicato 
oppure acquistarti presso i più qualificati 
computer shop e le migliori librerie . 

CEDOLA DI ORDINAZIONE- LIBRI 

Compilare e spedare in busta chiuso o: 

I so fi - Viole Restafli 5-70124 Mi tana 
tal. 02/6580841 -A8&OB42-AS80S43 

Ordino ì seguenti libri per un importa fatato di L « j 

+ L 2.000 come con fri bufa fìsso per spese di spedizione 

Cod Ik«i M*- Cbd, . . j 

Cod. ...... Cod, ..... « 

Cod — . Cod, | 

□ Confanti citagari 

□ disegno allegato 

□ Hospedrto l'importo a mezzo voglia postato 

□ Ho versoio / importo sul CCPn e 19445204 intastata a 
J. soft- Milano 

O Pagherò in contrassegno al postino al ricevimento dèi ' 
volumi 


Nome .. ... 

Cngnom# 


Via 


CAP^ Città 

............ prov. 

5# richiesta fattura - tonfici' fistole 

Data 





i. «a/C libri di quanti 

Cernili *4 ere CC 

Giochi fantastici per il C 64 

Cod. ASOC 001 L. 42.000 
(inclusa cassetta) 


programmi potrà essere 
vantaggioso per 
l’ apprendimene o delle 
tecniche di 
programmazione. 

// libro del C 64 
Volume ì 

Cod. ASOC 010 L 2 4.000 
(incluso cassetta) 
tt libro dei C 64 
Volume 2 
Cod . ASOC Oli L 
(inclusa cassetta) 

Idue libri illustrano a 
fondo le possibilità del 
Commodore 64. Un 
compendio di utili 
consìgli, e quanttelteo è 
necessario per conoscere 
meglio il proprio 
calcolatore . E sempì prati ci 
completano /'esposizione 
in modo chiaro ed 
esauriente. 


Per ZXiptctnnu 

15 giochi grafici par 
ZXSpectntm 

Cod. A50C 002 1. 24.000 
(inctusa cassetta) 

Un fantastico volume con 
15 entusiasmanti giacili 
grafici per il tuo ZX 
Specfrum Tutti i 
programmi sona '‘pronti 


C 64: suono # grafica - 

Volume t 

Cod.ASOCOÙSL 2 4.000 
(inclusa cassetto) 

C 64: suono e grafico - 

Volume 2 

Cad ASOC 009 L 24 000 
( incluso cassetto) 

Due volumi che non 
possono mancare nella 
biblioteca dell'atente 
Commodore. Lino miniera 
di idee e suggerimenti per 
la programmazione del 
tuo personal computer. 
Una vasto serie di 
programmi esemplificativi 
guidano il lettore al 
miglior sfruttamento del 
Commodore 64. 


all'uso " e ampiamente 
commentate / programmi 
sono scritti sfrattando 
appieno le capacità del 
calcolatore ed il loro 
studio può giovare a 
chiunque intenda affi n are 
/e proprie tecniche di 
program mozione 


Inoltre, r Paper Boofcr la 
raccolto dei programmi 
suddivìsi per macchino di 
Paper Sah f i I p rim o 
settimanale ai software su 
corto per il tuo computer. 

Paper Book - programmi 
per Apple // - 

Cod. ASOCD05 L 18.000 

Paper Book - programmi 
perVtC20- 

Cod. ASOCQG3L ì 8.000 

Paper Book - programmi 
per Commodore 64 - 
Cod ASOC 004 L 
Paper Book - programmi 
per Texas Tt 99/4 A - 
Cod. ASOC 007 L 18.000 
Paper Book - programmi 
per ZX Spectrvm - 
Cod. ASOC 006 L 18.000 
e 

d.sofL 

VnfefcsWfeJS, 5- 20 Ì24 À4*jtk> ft£ az'608064 ) ^8$Ù642-ó$S0e43 


In ogni volume, 
corredato di cassetta, 
oltre 40 programmi 
per il tuo computer, 
giochi grafici, 
utility, arcade , 
odvenfure uno miscela 
esplosiva di software 
'pronto ott uso '/ 



Vendo più di 30 programmi {giochi ed 
uiiKtyi per VIC 20 a L 5 000 ciascuno 

più imo m Tt :, i3dlò T iddcmare solo ore 
pranzo. Fabio Benedetti - Piazzi tstrm, 
28 6 - 54100 Massa Tei 330437 


Cambio programmi Si. c asseti a tomt 
Decathlon, Leopard. Ciane ai lo il giai 
camere e molti àlin Programmi di irti- 
'Hi y. Turbo Tape. che dimezza radutala 
de] caricamento, 80 Colonne che am 
plia la memoria. Giacomo Marconi 
Via 7 Pomi, 36 52040 Quadrata (ARI 
Tei 364075 

Vendo cassetta o disk contenente tre 
giochi € qual irò utility. Croi ProledOr 
2 - Indian - Fori Apache Pipe* Sea 
Sound Pel Speed Monitor, mito a ì 
40.000. Som-ere o telefonare, Salvato- 
re Purgato Corso Europa, 26 ■ &J030 
5, Marcellino (CE) Tel 001/81 2 1276 

Per Commodore 64 vendo programma 
Totocalcio che elabora sistemi integrai* 
condii tonati al numero di segni l X-2. 
Funziona anche in stampatile Per in 
iormaziem scrivere a. Sebastiano Ca 
tamagni C ont rada Cipoltozzo • 9601 1 
Augusta (SRI 

Vendo le seguenti cassette per Alari 
VCS 2600 a metà prezzo Drag&ter, 
Oink Football. Enduro. Haider* of thè 
Losr Arck, Ghost Manor Sptkés, Don 
key Kong, Pittali, Tenni*. Spider Man. 
Saace Shuttle. Cri si lino Cravanzoto 
Via Pro! Oh*-*. 16 12011 Borgo S 
Dal mazzo tCM Tvl 0171 769659 

Compro o cambu programmi (m mag 
giotaru* giochi) per VIC 20 inespanso 
■o espanso man 16 Kbyie Vendo car 
trìdge; Road Race, Poker . The Sky « 
tal-mg e altre Compro stampante per 
VTC 20 se a buon prezzo Scrivere a 
Leonardo Pesco Via S Nmaslro, 4 
91026 Mazara del Vaio 0923 945623 

Vendo faettr/ision più joytiieh, 9 cas 
«He (Buzz Rnmnhers. Lock'nVhase, 
Burger Tema,. Pillali. SharkSftark. Mi 
ero Surgoon. Veclron, Space Armida,. 
Poker e Blatkjac. k ) a l . 350 000, valore 
comrnérciato L 800 000 Roberto Fe- 
stini Via Asimiiczd, % 14055 Costi 
gitale cTA&ii (ATI Tel (il 41/966131 

Vendo e cambio per C64 olite 1.000 
programmi ci utility e giochi (pratica 
meni e quasi lutto il &ollware attual- 
mente disponi tuie per C 64 a pie* iti 
ecerionali inviati 1 L l ODO per li si a. 
Franco Billi Corso Milano. 36 14 100 
Asti Td. 0141/56182 

Vendo programmi per CBM 64 a sole 
L. 7.000 cadauno. Invio tote gran* 
Mandatemi le vostre richiesta Spedi- 
zione in contrassegno Sono anche di* 
posto * scambio di software. Carlo 
Fiorici ta Via $. SiL/estro. 2 030 L E 
.Aiatri (FR> 

Cambio programmi ed ulitry per GM 
crea 400) Inoli m cambio relescop» 
orotesstonate più canaletto ed acce* 
ion con floppy per CBM 64 Luciano 
Viola Via Scassa. 27 - 71036 Lucerna 
fFGj Tel 942255 

Vendo o cambio software per C BM 64 
Dispongo di molti programmi di utilità, 
gestionali e giochi Novità, prozzimndir 
n Oro Marocchi Va Marconi. 302 
65100 Pescara Tel 065 68352 


Per C64 vendo, cambio nuovissimi pro- 
grammi ed uriliiy a prezzi irrisori: Soc- 
cer, Sani Rcciler, Solo Flight Jet Set 
Willy, Fòle Fosition, Pipeline, indiana 
Jones, Pii Stop, One Qn One, B&se 
ball. Tulio a L. 35 .ODO. Rispondo a rutti. 
Francesco Doma Via Ugo Soli, 9 - 
90128 Palermo - Tel, 091/426143 

Per C64 cambio e vendo giochi come 
Zdx*ftn. Baseball, utility come Sarò Re- 
dtti . Cerco Ultra Copy osuralaf]. Ef- 
fettua cambi e vendile anche per VIC 
20 «penso e noni Pierangelo GaìLzia - 
Via Appia SS 7. 3 - -85050 Boragiano 
iPT) Tei 0971 993331 

Vendo CBM 64 p:u registratore 1530» 
vari giochi ed utility. Usto pochissimo 
I. 600 000 Rotando Carlini Via Stoc 
coltila, 5t 47037 Rimini Tel. 
0541 33868 

Per CÓ4 v«nd0, camUo moto giochi Ira 
cui; Pittati II, Falcon Pairol I e 2 , Pope 
Di J and L &rd. Magic Desk, 
athlon. Forbidden Foresi. Wi 
dow'sRevenge.Mr RoboiitutiiinTur 
km ape a 

L 3 000 Telefonare e inviare Oste An- 
none io sempre vaàcto FdwMnssubò 

Vin Ruma, 20 - 18039 VentPtnigta - Tel. 
0184 351829 

Vendo per C64 cassetta coniti nenie i 
seguenti programmi; Tool 64, Sinrans 1 
BASIC, FORTH 64. Pascal, The Bell*. 
Sto slalom, Pool 64 a sole L 15 000 
T n| e tonare o scriverla; Paolo Scruna 
Via Ter anto, 4 - 09170 Oristano - Tei. 
0783/259666 

VIC 20 Club sta realtà nandù per gli 
aderenti espansione 16/24 Kbyie Si 
accettano richieste esterne. Flavio 
Stanchi - Via Sparla. 26, '22 Sest fi P ■ 
1É153 Genova Tel. 010. 602435 

Vendo, cambio moltissimo software 
pei C64, a scelta su disco o nastro. 
Inviare lisiao richieste. Annuncio sem- 
pre walido. Paolo LaÉli Via Cas tellano - 
64030 Scorrano (TE) - Tei 086 1. 66437 

Eccezionale* Per CBM 64 vendo cas- 
setta o disco (più L- 8000) con i se- 
guenti programmi a soie L 40.000- De- 
cathlon, truernanonal Soccer, Jungle 
Hunt , BtUàrdo, Brusi Monm. King Kong, 
Jarnbieaker e Pac Man. Inoli re, per 
tuli» gli acquirtmii, h v^rànHorqiw 
ds T orbo Tape in omaggio. Sono anche 
d’SpoSTO a cambiai li con Sam più Si- 
mons' BASIC e Magie Desk su nastro. 
Annuncr* sempre valido Scrivere a: 
Gaetano Sandovaìfi Via C .le Massaia, 
53- a 90142 Palermo 


Vendo VIC 2D pò registratori', joy- 
stick. corso BASIC, cassette videogio- 
chi. rittste. manuale, tutto a L 300 000 
non trai labili. Telefonale dopo le ore 
20. 00 a: Claudio Pucci ViaF Menz&c 
chi, 1- 47100 Forti - Tel. 0543 24027 

Vendo oltre 500 programmi per C64, 
giochi ed utility. Il prezzo è di L 5.000 
per ogni program-mvi. diminuiste per 
l'acquisto di una cena cniità. Antonio 
Lieo i o Via A. Zac co, 38 95 1 25 C al a- 
nia ■ Tel. 095 330531 

Compro programmi pei VIC 20 ih- 
espanso o con 16 Kbyte, Inviare Icsre 
progiammi. Giampaolo Cori Via G. 
Pudctni, 33 - 57100 Livorno - Tel. 
0586 401698 

Compro utility e giochi per C64 Inviare 
liste e prezza per vistone Bono interes- 
serò poi j Turbo Tape v Senons" BA- 
SIC con istruzioni senile m Uditorio, 
Antonio Noto c o Dento - Viak- XK 
Set tiembric 2ì 54033 C^rar* (MSl 

Cambio piogrammi per C64. Ho piò à 
IGDpriigrqmmi Sià su disco che cosse! 
:a. Im-iate la lista dei vostri programmi 
e vi invierò to rtlto Grdziamj Carraa - 
Via Augusta. 100 39100 Bolzano Tel 
0471 44874 

Vendo VIC 20 più icgisrr alare C2N, 
memorie Ib e S Kbyte, 3 carlndge ai- 
pai et chi giochi, wlumt e cassette BA 
SIC 1 2. libro ’ ll Commodùre VIC 20" 
a i. 400.000 Renzu Monteccai - Via 
Mazzini . 1 1 20090 V«modix»H. t M I J 
Tel 02 2504966 

Cambio vendo molto software espan 
so e mespanso per VIC 20, su nastro, di 
schi-'fti, fistiti OfWte vantaggiosissi- 
me. Inviale la vostra lista a: Gregorio 
Lena - Viale Silvani, 3/2 - 40122 Bufa 
gn tì Tel. 051551178 

Cerco per Commodore 64 giochi su 
cassetta a prezzo non supcriore a L. 
4.000 ognuno. Ecco i nomi; Decathlon, 
ZdKKpn. Pule PosittortiH Calcio. Martel- 
lo Grand. Via Dante Alighieri. 2 
50064 Incisa (Fi ) Tel. 055/8335003 

•Scambio e vendo programmi, giochi ed 
utility per C64. Chi vuoJg contattarmi 
può tek-fnrMn< i» m riv^rf inviando la 
lista dei rucigraniTTii Ere* Cattaneo 
Viale Mantenevo. 76 20135 Milano 
Tel 02 599280 

Compro espan^oni 3 Kby te e fi Kbyte 
per VIC20,5Òk>sebuonpieìio Albe* 
IO Caccili Via £ AJ&endìe, 15 40139 
Bulugna 

Ceno 4 KIwtF "AHa sroperta dei VIC 
20" edito da Editoriale Jtockson Chi li* 
v in p4)*sesao e In vuole vendere, nv 
contarti: offro L 101000 Vincenzo Di 
quaiiro Via La Masa. 15 97100 Ragù 
sa 


VIC 20 Software Club Se avete pro- 
blemi pet avere pi ogr amimi, scambiale 
esperienze, ecc., associaiitvi a noi. L'i 
scrizione è granfia e garaniiamunspc- 
sia à tulli Massima serietà. VIC Soft 
Cùb c o Cinzia Cecearini Via Di Vk 
tono, 10 58022 Follonica (GR| 

Vendo e cambio giochi ed mili ta per 
CBM 64 a prezzi a! di solto dell 'econo- 
mie ita Massima serietà. Invio lista, ai- 
lendo La vostra. Scrivo a tutu quanti. 
Felice VaccNsno Via Corpo di Cristo 
80033 Cicctano INAI - Tel 
061 6268772 

Venda V3C 20 più 4 cassette gjochi a 
L 230.000 Valerio BaUaglini Via Ar- 
gentieri Vico 1,3 66036 Mori tenera di 
Bisaccia (CB) Tei 966231 

Vendo listati per. Apple, TI 99. 4A,Sm 
dair Spectfum 16 48Khy-1e, C64e VIC 
20. Oppure scambio con il VIC 20 Seri 
vere a Armando Mendoltochio - Via 
Gmo Acqitavtva. 27 71100 Foggia 

Compro pei VIC 20 erspanstoni di me 
mnrw dà 3-8-1Ò24 Kbyte e programmi 
di geomeina e trigonometria a prezzi 
vantaggiosi Compro anche program- 
mi da Ime a. Ftav» Franco Via Motne 
delle Girne, 34 00Ì99 Roma Tel 

06 8391353 

Vendo gtochi fièr CBM W npurtan, m 
pai te . da c ari uccia a casse 1 1 a Tra essi 
dispongo di. Foie Poation, Fohbjdden 
Fnrpiit Le Mans. Fnn Aporalypse, Po- 
peye, Sbtorn, Froggee e tanti alm. tutti 
ev cer ugnali Con ^*i è h >r nrto il T urbo 
Tape che li aziona- J^ochi sono (orniti 
a L. 5.000 cadaurio RatlaeJe Virale - 
Via Vesuvio, 14 80058 Torre Annun- 
ziata iNA;' Tei 081. 2618602 

Camfjci circa 1 500 progratrarii per 
C64 con matertolv radioamatori - CB 
«cevitLffi e TV usalo. Telefonai ore 
l'stóii Giuseppe Borracci Via Mandi, 
15 33100 Udme Tel 0132/293665 

Vendo giochi su càssella per C64 e 
VIC 20. Olbo a L 20,000 ca&aetta coni 
seguenti giochi per CBM 64: Kongo 
Bongo, Azit-c, Ducatblon, Soccer, Po 
peye. Crazy Kong Scrivete a- Luca 
Nardim Via Colle Ferino 00049 Velie 
tri (RM) 

Cambio gioco elettronico "Dribbli ng- 
tronic’' con espiinsione 16 Kbyte per 
VIC 20 Mar zio Cetani - Via St azione, 
22 3 1020 Mone (AD) 

Compro bobine metalliche uuate per 
registratore prufessionaJe (dtomeiro 
Ctn 24 i. Solo Milano e provine ta. Mauri 
Zio Violi Via Moli netto di l.or 20094 
Comico (MI i Tei 02 44 Ù 7292 

Vencki per Commodore 64 van giochi 
dal 1 500 al 5 000 É Za uxori. Donkey 
Kong i dspombA su cassetta o disco 
Vvndn per C 64 Turbo Tape a L 4 000 
Allego ad ognuno un elenco tgraiuito) 
deigiucMififniùposaesaci Per infornvs- 
zumi Marco Biefanono - Va Marconi, 
17 21052 Busto Arata» (VA) Tel 

0331 639943 
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Orno Gelsomino - Via Belvedere, 1Q 
3001 t Aglrè (TO) Tel. 0124, 33213 


Compro, vendo, càmbio programmi 
per CM. Cereo GOPfJtUllci programmi 
d srudfo, ge-sréinàfj. usiàues a poco 
prezzo Vendo cassette con program 
mt registrati (solo giochi) a L. 10.000 
15.000 cadauno. Giiirgfo Cavagna - Via 
Vetulonià, 33' 0QIH3 Roma Tel. 
06/7587969 

Per C64 vendo, cambio. programmi di 
giochi, utili ly, muMcali, grafica in alla 
risoluzione, matematica. didattici. Ri- 
chiedere lista o riformatori a; Mario 
Massimo Caputo Via Roma, 19 - 
01030 WrcMCEi TeL Q6LS1 30104 

Vendo, per VIC 20 mespan&o, 4 splen- 
didi giochi su cassetta all'eccezionale 
prezzo d L. 60000. Un'occasione da 
non perderei! pagamento tramite vae^ia 
posale Mariano Campanelli - Via 
Don L Paotucc, S 63033 Cento Bo 
dà (API 

Vendo VIC 20 più legislatore, joy- 
stick., 60 programmi l eb cui 33 in LM), 
alimentatore e cavi, molle riviste di 
computer, manuali e libro in italiano, 
ancora in garanzia, imballaggi emanati, 
il (ulto a sole L 350 000 Marcello Ga 
lenti ViaTonenova, 134 00133 Roma 

Vendi.» (causa p&s&agg» a sistema su 
penare) VIC 20 ptù re y si rotore decise a 
tu. joystick. 3 manuali, 1 casetta con 
40 stupenti giochi, molte riviste e più di 
300 programmi II tutto in oli ime condi- 
zioni a L. 380.000 Giovanni Azara - Via 
Peone, 3 20089 Rozzano (MI) Tel. 
02 8240807 

Vendo . cambio bstai i di programmi per 
VIC 20. I prezzi vanno da L 500 a L 
2500. Vendo programmi |o cambio 
con altri per VIC 20) per C64. ZXSl 
16/4S Kby:e r Apple. Tt 99/4 A; MPF lì, 
One 1. Nonostante tutto mi occupo 
«ilo di Estati per VìC 20 Eraldo Capre- 
ra Va Ortetìe, 23 02019 Supino (FRI 

Vendo, cambio programmi per C64- 
Ittv» lista gratuita Inviare lesta per 
cambi Carlo Sciare ia Via E. Raggio, 
32/2 15067 Novi Ligure Tei 

0143/70089 

Per C64 vorrei acqui ài are software gio 
chi e utility, qualsia^ upo Per vendite 
■nuore lista, prezzi, caratteristiche, 
etc, Senza impegno di acquisto. Pro 
grammi su nastro o listati Marco Lix 
ehm Via Marengo 46045 Marniirofo 
EMN) 

Vendo base lntelle^$ioncon 13 ottime 
cassette (3 Imagic) a sole L 250.000 
causa acquisto computer. Il lutto in 
perfette condizioni. Paolo Mugliar i 
Via T Culli, 19 20147 Milano Td, 
02/4016559 

Per C64 vendo o cambio t ani 55 sur* gì o 
chi a prezzi eccezionali, ad esempio 

Rote Poéìifort, SimarH' BASIC L. 
IQ.COQ, Defenzter, Dig Dug L 8 000 
Tutti registrati Con Turbo Tape. 5cn 
vele per mulo k&tirio. Telefonare per 
scambi. Luca G&stiglfoni Via Milano, 
69 22070 Bregnanp (COi TeL 

031 772736 
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Compro, vendo, cambio programmi in 
linguaggio macchina per C64 (Manie 
Mi nei, Dcnkey Kong, Polii Pnsifioin, Pii 
Stop, bcc.Jl Scrivere 0 tele fonare ore 
pasti Emanuele Ricuci Via Capo Po 
n». 45 - Q0I22 Roma Lido Tel 
«6/5602133 

Vendo tì programmi su cassetta con 
Turbo Tape a L. 35.000 Riskrt. H E 
R O , Fon ApocaJypse. Btadbal, Star 
Trek originato. Invio listi 1 Roberto Co- 
st agitalo Via G. Ricci Cufbastro. 34 - 
00149 Roma Tel 055589365 

Ho fi mdato un club privato pet VIC 20, 
e se qualcuno vuole mandarmi 1 prcpn 
programmi. 10 ne rnvierù degli alrri. 
Cnco anche espansione 16 Kbyte a 
prezzi ritorno alie L. 50 00» Assicuro 
massima serie là Valentino De Duina 
Via Brodevin 32040 Lazzo di Cadore 

(fiU 

Vendo VIC 20 più registratole C2N, 
K>V*ttak. BASIC parte l. 00 giochi m 
tassella. 1 carindgr 1 . ribio ‘ Ala sco- 
perta del VIC 20" a L 300 000 non 
trattabili Claudi.; Spadazzi - Via Trio 
Rapino, 14 47100 Fori Tei 

0543/35602 

Vendo cassetta contenente 11 giochi 
origina 6 Commudkmi fi L SO 000 (Mun- 
di ài Soccer, Pota Poation. Pac Man, 
Sky Race Inciti re tendo cartucce: 

Jupiter Lànder a L £0000 e Radar R.n 
Race a L. 25.000. Avviso sempre và&dof 
Mare db Caputo Via Finger. 1 - 
71100 Foggia Tel. 0681, 25072 

Vendo consoli Intel tavlsiòn più 14 tas- 
selli giochi a L. àQO.OlXi Vendo color 
computer Laser 200 9 colori, 16 Kbyte, 
espandibile fino a 64 Kbyte. sonoro più 
una cassetta dimostrazioni, e manuale 
d'uso a L 100-000 Vincenzo Roscigno 
Via Roma. 52 8409 3 Bari tpa^ta ( SA) 
Tel UB2S/21567 

Vendo programmi su listato per VfC 20 
a !.. 500 cadauno più L I OQQ per spese 
postali Chi è ini crescalo scriva su lei - 
iure nome, cognome, indirizzo, città, 
CAP, numero telefonico e ì listati ri 
chiesi 1 Inserire anche prezzo e nume 
ro dei talari. Cere Anitsmu Via Volta 
13044 Crescemmo (VO Tel 
8161 843055 

Vendo VIC 20 come nuovo più regi 
Stratore. cartuccia 16 Kbyte. joystick, 
introduzione al BASIC 3 e numerosi 
listati a L 400,000 Enzo Cuti Viale 
Stazione, 25 12032 Bargu tCN) TeL 
0175/36762 


Vendi* per VIC 20: cabinet a 6 slot 
model \nC 20 a L 200 000, S E al. 

35.000. Sintetizzatore uncdta a L. 
140 00Ó, 16 Kbyte a L 80 000 e VIC 2Q 
a L 110.000 Telefonare dopii le 14 
Beppe De Vanna Via Fontanelle, 8 
70057 Palese (BAI 

Vendo VIC 20 più 16 Kbyte RAM, alla 
risoluzione. 2 cartndge (Ptiker, Siste- 
ma Solare Visìbile). 100 programmi su 
caatMiv It tui io a L 290 000 e m ot nmo 
staio Roberto Tre zzi Via Don E Cai 
lance?. 5 - 20025 Legnano (MI) Tel, 
0331 5440 17 

Eccezionale 1 Vendo software per VJC 
20 mespsnso a prezzi fantafitid Giochi 
come “Troui", “Konghy '. "Defender" 
preiicamente gratis. Per la lista e infoi - 
maziora senvere piegando L 500 a; 
Brunir Sereni - Via Etassu. 14 26034 
Piadend (CJ?) 

Camtmti o vendo 300 proyammi per 
VIC 20 in LM u RLM. Scrive tettii, vi 
invierà il mio catalogo con relati vie 
istruzioni Carlo Vincenzi Via Resi- 
si enzà. 26 41033 Concordia (MO) 

Tel 54325 

Cambio software per C64 Annuncio 
sempre valido Domenico Rizro Vìa 
Capevano, 20 66013 Ch«m Scafo 
Tel 0871. 684239 

Per C64 vendo T cambio programmi su 
disco Puss ledei utility, gestionali, molti 
videogames da bar Chiedere elenco 
allegando busta affrancata per la rispo 
sia Anna Di Ruschi Via Marconi, 27- 
630 10 Mtmleftore deS Aso (AP) 

Vendo Commtxfore VIC 20 più regi 
siraicire Maxlron, espansione 3-8- 16 
Kbyle, ^ giochi di ogni tipo a L 

400.000. FabroAlpiovezza Via Fonale. 
6 20162 Milano Tel 02,6433182 

Per CBM 64 vendo e cambio program- 
mi su cassetta e floppy Turbo Tape, 
Simons BASIC Frcgger. Basket. Cal- 
cio, ecc Sempre o telefonare per invio 
lista di circa 1.000 tre giochi ed utility 
Multi m omaggio. Francesca Petnccio- 
ne V ut Vene^ iti . 43 - 8 1022 Casagìn ve 
(CE) Tel Of!23v-46É4l0 

FVt Cornmdr>re 64 e Sinclair Spet trum 
dbsponendo- di un notevole archivio 
software i«ndo a L ÌG 000 cassetta 
con 5 giochi a scelta. Anch* s« deco 
Annuncio sempre uabdo Scnvere a: 
Ivano Pairbuono - Via A eli Cambio, 4 - 
37338 Verona Jet, 045, 560649 

Ctrm-pro, cambio, vendo software per 
Commodore 64. Molti gechi ed utility, 
rie hìvdtre la lista allega ndn L I 000 per 
spese pusiaii Cesare Giarda Via Vi- 
scere!, 33 28065 Cerano fNOl 


Vendo, cambio software per VIC 20 su 
cassetta- Invio la nma lisra di programmi 
a chi mi invia la propria Alcuni de» 
programmi sono disponibili anche su 
tate So Ivano Modenesi - Viale Sic Sta. 
55 27100 Pavia Tel G382, 472t42 

Ver idi 1 VEC 20 cjì per le ire condizioni 
con imhaHagg,io a L 150.000 più spese 
poetali, compresa cartuccia Satgon 
Ck» M Telefonare b Lauro Kt mtan- 
2jn Vj«i Cu ndott 1 . 33 1 33033 O <#r<jc 
pofUDl T«*. «32 906352 

Vendo CBM 64, darassetre, 2 joystick 
Snetirn video II, cassetta Dr«j D ( iclar 
leni:, garanzia italiana GBC, j^truiioni 
italiano, ancora in scatola originale, Ac 
quotato Ottobre 1904 vendo, per pas- 
saggio a utdeogxjco (nielleuision, a L 
6G0 OOG Paolo Mazze: - Vi* T ommasn 
Pmt.45 50047 Praro Tel Q&?4 596018 

Vendo computer Lufty, da Pìs^nre nel 
vidcogarncs InteSecnsicm. A partire da 
L- 200 frflfl. compresa cassetta Scooby 
Djxi Maze Chase. Telefonare giorni le- 
tLali dalle 14 ale 15- As conio Vitale 
Piazza Mi indi agone, 9 - 00132 Napoli - 
Tel 0& 140269 

Vendo o cambei 1 seguenti programmi 
per C64 Eov, Script, Turbo Tape. 
Serena Graphics. Simons BASIC , Sla- 
lom, Snu, Inturnalional Soccer, Bilia r 
do. Rnle Posiiion. Sup^r Pipeline. f rog- 
ge r. Dispoiìibifi anche regimali con 
Turbo Tape. Prezzi mìnimi. Allegare 
frane obolfo per la riposta. Lorenzo 
Gianni mo ViaZaneUi. 19 251QQ Brc 
scià Tel 030/294505 

Venda cassetta cori 20 programmi e 
uKÌtt^ich a sole L 25.000 (Poe Man. 
Pole Positi on. Apocaiypse, Soccer. S<- 
morts' BASIC, etcì Per informazioni 
scrivere inviando L 400 m francobolli 
per La n&po&ta a: Franto Bas&amo ■ Via 
Mazzini, 7 97013 Comiso fRG) 

Vendo VIC 20 in ottime condizioni più 
2 carrette | Cosmi: Crune her e Vtsibie 
Solar System), libro “Aita scoperta del 
VIC 20“ , manuale, cassetta giochi «t 
utfrnes, trasforiTiaiope Vendo anche 
separa tornente Telefonare ore pasti a: 
Giuseppe Monacane - Via G. Fanelli, 
225 4Ó 70100 B&n Te3 080/481614 

Venda software da bar per il CBM 64 
{Qui*. Donkey Kong. Fole Posilnn, 
kc ) a prezzi straccare 10 ^ochi L 
20.000 Scnvete o telefonate. Davide 
Cutrmo Va Gconi. 25- 35100 Padova 
Tel 049/660006 

CBM 16. pvr primi in Italia disponiamo 
d lui package di programmi gcsi iemali 
e uìdengaTre-s La cassetta o il floppy, 
comprese istruzioni ni italiano f scippo? 
ri crenpresri, L 80-000. Per ordini La 
Scwla per l lnformaiicà Casella Po 
stale m\ì 20170 Mùano 

Vendo programmi per C&4- Vasta «el 
la di video games ed utility. Disponibile 
cassetta adisco. Gradita tata per evita- 
re eue nivali doppioo. Rispondo ù lutti 
Claudio Luciani - Via Gogann 63020 
Piane <ft Falcrone fAP) 




ORE 
PER SPECTRUM 

Questo semplice corso di autoistru- 
zione insegna a programmare, e ur, 
programma ha sempre bisogno di 
due ingrediente un linguaggio e una 
struttura, dunque questo libro non 
insegna solo il BASfC, ma anche co- 
me si organizza correttamente un 
buon programma 

Cod. SOIE Pag. 360 Lire 40, m 


avanzate 


Al CONFINI 
DELLO SPECT 
Applicazioni 

Un esame attento dei listati consenti- 
rà al lettore di apprendere i 'segreti' 
delia programmazione strutturata e 
mi giro rare notevolmente le proprie 
capacità di programmatore 
programmi presentati vanno dagli 
arcade più famosi tra cui il celebra 
’Spectrum Invadere' ai programmi di 
utilità più interessanti, dai giochi 
d'azzardo al programmi didattici, dai 
programmi funzionali a quelli di ma- 
tematica e di giochi di strategia. 

Con assetti 

Cod. 4148 Pag. W Uro 28.000 


La biblioteca che fa testo. 


MACCHINA DEL 
COMMODORE 64 


ii libra apre nuovi orizzonti a tutti 
loro che sono interessati alla pro- 
grammazione in linguaggio macchini 
del COMMODORE W. 

Con cassetta 

Cod, sm Pag. m Ure 29 MO 


fkxSnay Zaks 

IL TUO PRIMO 
PROGRAMMA IN BASIC 

La diffusione del BASIC per la sua 
semplicità e quasi 'naturalezza' di 
programmatone fa si che una cultu- 
ra generale sull'informatica e la sua 
applicazione, non può prescindere da 
una conoscenza di base di questo 
linguaggio. Questo lo scopo del li- 
bro permettere anche a chi ha sol- 
tanto una cultura di base, di capire 
che ccs'è il basic e come si usa. 
Cod, 5Q7B Pag, 216 Lire 19.500 

Czes Kosntowski 

MATEMATICA E 
COMMODORE 64 

Tutte le funzioni matematiche dispo 
rubili sul €64 sono qui descritte, ed ii 
toro uso è illustrato con programmi 
che possono essere utilizzati dal let- 
tore alTinterno dei suoi, per partico- 
lari applicazioni. 

li libro contiene anche informazioni e 
programmi su altri argomenti, come 
♦ codici e la cratfograite, 1 mimerr ca- 
suali. te serie, la trigonometria, i nu- 
meri primi e ranalisi statistica dei 
pjj|L 

Con cassetta 

Cod 57QD Pag. 160 Utt 24,000 


Mtke Grave 

ÀDVENTURE E 
COMMODORE 64 

Un manuale per ideare e utilizzare 
programmi di Ad ve mure basati 
esclusivamente sul testo 
Una progettazione modulare del pro- 
gramma rende più, facile la compren- 
sione delia struttura. V abili là nella 
programmazione avra modo di emer- 
gere durante la costruzione graduale 
dell'Advenlure, per modificare il pro- 
gramma dimostrativo, o addirittura 
per costruirne uno nuovo, 

Con cassetta 

Cod , 5710 Pag. 240 Ure 35.600 


Rita Bonetti 

COMMODORE 16 
PER TE: BASIC 3.5 

È un libro di introduzione al BASIC 
C1G con ii classico taglio didattico 
Bendi*. Adatto per te Scuola media 
inferiore e per chi non conosce l'in- 
formatica 

La cassetta allegata al libro contiene 
diverse lezioni, una per ogni capito- 
lo, che devono essere lette prima del 
capitolo relativo. 

Con cassetti 

Coti 4138 Pag, 296 Urs 35,000 
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Aiwttflj Globe 4 


Dietro no b 
et sempre 


esattezza quanti ; vw V. b. urtandoti 

bambini in Italia * Nomee Cognome ..... 

subiscono violenze. J Indirizzo 

Tanti, purtroppo. * C4P,,„... ^Oa 

Ma una cosa t certa: J r mwu , 

la violenza che oggi « 

nn bambino subisce • # .T 

e impara, da grande 
la ritorcerà contro la società. 

Bisogna intervenire, e subito: agendo sulle cause. 
Intervenendo sulla crisi familiare che è 


“Vorrei contribuire aneti Ho", 
Per sostenere il C.A.F, vi invio 


□ jl lo.tm 

□ L- f 00. 000 


D L 25.000 
□ L. 500.000 


□ Tramite assegno bone ario infestato C.A.F 

Via V. E. Orlando 15, 20142 Milano, che vi invio, 
unito a questo tagliando. 

□ Tramite versamento mi C. G P 22349203 intestato C.A F 
Via V E Orlandoli. 20142 Milano 

Some e Cognome ... *,.«* 


A itendo fiee vuta e tesserino di ‘Sostenitore ' * del C A J 7 


Arvi ,nvto * Segnaliamo 

ooo □ l. so ooo 2 ai Servizi S ocùi li 

000 nL ; de! Territorio i casi 

r >C A F “I di maltrattamento. 

'ano, che vt tnvto, 5 _ 

m La prima cosa da 

i* 22349203 intestato C.A.F * fare : segnai are Ogni 
k™ J caso di maltratta- 

- — - * mento di cui siamo a 

* * * J conoscenza o di cui 

* abbiamo il fondato 

2 sospetto. 

* Telefonale ai Servizi 

*T***** **• •#***• Sociali del Territorio 

dal lunedi al venerdì, 

dalle ore 9 alle ore 12 (troverete i numeri di 
telefono su Tuttorittà), oppure al Tribunale per i 
Minorenni (chiedendo del giudice di turno) dal 



UN BAMBINO 
MALTRATTATO OGGI 
SARÀ UN UOMO 
VIOLENTO DOMANI. 


lunedi al sabato dalle ore 9 alle ore 13, telefono 
4988001/2/3: oppure al C.A.F. , a questi numeri di 
telefono 02/8265051/2, che rispondono 24 ore 
Su 24, 7 giorni su 7, 


sempre alla base dei mal trattamenti 
a un bambino. 


Sosteniamo il C.À«I*\ 

TI C.A.F. è il primo Centro di Aiuio al Bambino 
Maltrattato e alla Famiglia in Crisi, sorto in 
Italia con lo scopo di intervenire nei casi di 
maltrattamento. 

Oggi, nella sua nuova sede più grande e attrez- 
zata, accoglie provvisoriamente ì bambini mal- 
trattati, contemporaneamente svolge un’azione 
terapeutica sulla famiglia per ripristinare l'equilì- 
brio e reintegrare il bambino nel suo ambiente. 

II C.A.F. è un’istituzione privata che opera in 
collaborazione con i Servizi Sociali, con t 
supporti messi gratuitamente a disposizione 
dal Comune di Milano, e con i contributi 
Hk finanziari volontari dei cittadini. 

Contribuisci anche tu, utilizzando il 
v ^k tagliando, é un gesto necessario, per 
^k i bambini maltrattati, per te che 
vuoi fare qualcosa di concreto 
^k contro la violenza. 


Spazio gratuito 
offerto da J.soff 


CENTRO di aiuto 
AL BAMBINO MALTRATTATO 
E ALLA FAMIGLIA LN CRISI 




SINCLAIR QL: 

AL VERTICE DELLA NUOVA GENERAZIONE 


Sinclair QL rivoluziona il mondo dei computer, perché 
combina le dimensioni di un home con la potenza e le 
capacità di un mini. 

QL è l'unico computer, nella sua fascia, ad impiegare 
il microprocessore a 32 bit. quando gii altri si 
fermano a 8 oppure 16. 

La sua portentosa memoria è di 128 KRAM 
espandibile a 640. 

I quattro programmi applicativi, 
già incorporati, 

sono immediatamente utilizzabili 
e superano, in qualità, il software 
dei microcomputer esistenti. 


Ha la possibilità di multitask e può essere inserito in 
reti di comunicazione. 

Grazie ai due mtcrodrive e al software incorporati, 
Sinclair QL. nella sua confezione originale, è già 
pronto per l'uso: basta collegarlo ad un video. 

E pensare che tutta questa tecnologia pesa meno di 
due chili e trova spazio in una normale 24 ore. 

Un computer cosi non poteva che essere Sinclair. 


Tutti i prodotti Sinclair, 
distribuiti da GBC Divisione Rebit, 
sono corredati da regolare 
certificato di garanzia italiana. 


a ■ ■ 

Sinclair - 

Distribuzione esclusiva: GBC Divisione Rebit. 





